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-I 1.0 CCNERM. PROGRAn iNFORnATION. 

V 



74 l.l P«)G«Ar< PURPOSE (ABSTRACT). 

^2 THIS DIAGNOSTIC IS \ LOGIC TEST TO VERIFY THE OPERATION OF THE 

OLVll-E SERIAL • xNE INTERfACE. T»€ PROGRAM AS SET INITIALLY 

*S DEFAULTS TO ALL OPTIONS. EXCEPT PROGRATtlMLE BAUD RATE. 

79 EIM8LED MO A URAP CABLE COMCCTEO. T»€ USER CAN SELECTIVELY 

50 EIMBLE MO DISABLE TESTING OF THE OPTIONS BY ALTERING THE 

51 CONTENTS OF ' lUSER' . T»C DIAGNOSTIC IS DESIGNED TO TEST AND 
82 DETECT FAULTS TO T>C LOGIC LEVEL (NOT TC T>C CHIP LEVEL). 

55 THIS TEST OPERATES ON UP TO SIXTEEN(16) IDENTICALLY COHTIGUREO 
S4 DLVll-E SERIAL LINE INTERFACES. T»C DEFAULT ADDRESSES MIE: 

56 175610 -FIRST SERIAL LINE ADDRESS OF 16 CONSECUTIVE 

57 SERIAL LINE DEVICES. 

sa 

09 

90 300 - VECTOR FOR FIRST OF 16 DEVICES. 

91 

92 THIS PROGRAM IS DESIGNED TO RUN ON ANY POP-11 UITH 4K OF 

93 MEMORY MO A OLVll-E (LSI -BUS) MODULE. IT CAN RUN UW)ER XXOP. 

94 APT. AND ACT MONITORS. AND ON PROCESSORS UITH NO HARDWARE 

95 SUITCH REGISTER. A POWER FAILURE UILL CAUSE THE OIAG- 

96 NOSTIC TO RESTART. 
97 

96 1.2 SYSTEM REQUIREMENTS. 

99 

100 1. HARDUARE REQUIREMENTS: 

101 

102 ANY POP- II FAMILY PROCESSOR 

103 4K MEMORY - MINIMUM 

104 H315 - CABLE TURN AROUND PLUG (OR EC iVALtNT) 

105 MODEM CABLE - BCOIV-X OR BC05C X 
106 

107 

106 SOFTWARE RCOUIREMENTS: 
109 

110 

111 THIS DIAGNOSTIC IS DESIGNED TC RUN IN ANY OF THE 

112 FOLLOWING WAYS: 

113 STMO ALONE 

114 WITH APT MONITOR 

115 WITH ACT MONITOR 

116 WITH XXDP MONITOR (CHAINABLE) 
117 



Li 
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lie 1.3 RELATED OOCUnENTS AND STANDARDS. 

120 DIAGNOSTIC ENGINEERING STANDARDS AND CONVENTIONS 175 003-009-02 

121 APT MO-ll-OZZHA 

122 ACT AUTOCAT ll-QZAUB 

123 SYSMAC MO-U-OZQAC 
124 

1 

126 1.4 DIAGNOSTIC HIERARCHY PRERECKJISITES. 

127 NO SPECIAL DIAGNOSTICS ARE REQUIRED TO RUN BEFORE THIS. BUT 

128 THE PROCESSOR. MEMORY, AND BUS ARE ASSUMMEO TO BE FULLY 

129 OPERATIONAL. 
130 

131 

152 1.5 ASSUMPTIONS. 

133 

134 

155 THIS DIAGNOSTIC ASSUMES THAT THE OPERATOR HAS INITIALIZED 

156 LOCATION ' iUSUR' AND ' (OEVM' TO THE PROPER VALUES. 

137 THE (H) MMKK MUST BE REMOVED FROM ALL DLVll-E'S UNDER TEST. 

ise 

139 

140 2.0 OPERATING INSTRUCTIONS. 

141 

142 

143 

144 2.1 LOADING AND STARTING PROCEDURES. 

145 

146 USE STANDARD PROCEDURE FOR PDP-11 ABSOLUTE BINARY FORMATTED 

147 MEDIA. 
146 

149 THIS DIAGNOSTIC HAS ONLY ONE (1) STARTING ADDRESS. 200 FOR 

150 START AND RESTART. 
151 

152 THE USER CAN SELECT A SPECIFIC TEST TO BE EXECUTED By SETTING 

153 SUITCH 6 IN T»€ SUITCH REGISTER AND THE TEST NUMBER (IN KTAL) 

154 IN THE LOUER BYTE. (NOTE: ALL TESTS PREVIOUS TO THE SELECTED 

155 ONE ARE EXECUTED WITHOUT ITERATIONS.) 
156 

157 

156 2.2 SPECIAL ENVIROItCNTS . 

159 

160 THIS DIAGNOSTIC FOLLOUS T»C STANDARD PROCEDURE FOR RUM4ING 

161 UOER APT.ACT.XXDP MONITORS. AS DESCRIBED IN THEIR RESPECTIVE 

162 PROCEDURES MANUAL AND SYSMAC PACKAGE. 
163 
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2.3 OPERATIONAL SUITCH SETTINGS 

165 



166 



IF THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A SWITCH 



ALLOWS THE USER THE SAME SWITCH OPTIONS AS T« 

HARDWARE SWITCH REGISTER. IF THE HARDWARE SWITCH 

REGISTER DOES NOT EXIST OR IF ONE DOES AND IT CONTAINS 

ALL ONES (177777) THEN THE SOFTWARE SWITCH REGISTER 
(LOC. 176) IS USED. 



REGISTER THEN A SOFTWARE SWITCH REGISTER IS USED WHICH 

168 '^'^ 
169 

ro 

171 
172 
173 

175 CONTROL: 

177 THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF THE SOFTWARE 

178 SUITCH REGISTER CLOC. 176) FROM THE TTY. THIS CAN BE 
17V ACCOMPLISHED BY DOING THE FOLLOWING: 

180 

181 1) TYPE CONTRX G <tG>j THIS WILL ALLOW THE TTY TO ENTER 

182 DATA INTO LOC. 176 AT SELECTED POINTS WITHIN THE 
185 PROGRAM. 

164 

185 2) THE MACHINE WILL THEN TYPE:' SUR-XXXXXX NEW-' (XXXXXX IS 

186 THE 0C1AL CONTENTS OF T« SOFTWARE SUITCH REGISTER.) 
187 

186 S) AFTER THE NEW-' HAS BEEN TYPED THEN THE OPERATOR CAN DO 

189 ONE OF THE FXLOWING AT THE TTY: 

190 

191 A) TYPE A NUrOER TO BE LOADED INTO LOC. 176 FOlLOUED BY 

192 A <CR>. (ONLY NUMBERS BETWEEN 0-7 WILL BE ACCEPTED). 
195 LEADING ZEROS NEED NOT BE TYPED. AND IF MOPE THAN 6 

194 DIGITS ARE TYPED THE LAST 6 WILL BE USED. IF A <CR> 

195 IS THE FIRST KEY DEPRESSED THE SOFTWARE SWITCH 

196 REGISTER CONTENTS WILL NOT BE CHANGED. 
197 

196 B) IF A CONTROL U <tU> IS DEPRESSED THEN THE PROGRAM WILL 

199 SEND YOU BACK TO STEP 5. 

200 

201 C) IF THE INPUT CHARACTER IS NOT ONE OF THt CHARACTERS 

202 MENTIONED ABOVE THEN A QUESTION MARK C?) WILL BE TYPED 

205 FXLOUED BY A CARRAGE RETURN AND A LINE FEED 

204 THEN PROCEED FROM STEP 3 (ERASING ALL PREVIOUS ir«>UT.) 
205 

206 DYNAMIC SUITCH REGISTER 

207 

206 

209 BIT 15 - HALT ON ERROR 

210 14 - LOOP ON TEST 

211 15 - INHIBIT ERROR TYPEOUTS 

212 12 - (UNUSED) 

215 11 - INHIBIT ITERATIONS 

214 10 - BELL ON ERROR 

215 9 - LOOP ON ERROR 

216 6 - LOOP ON TEST IN SUR<7:0> 

217 7:0 - TEST NUMBER TO LOOP ON (USED WITH BIT 8) 
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SEO 6 



216 



2.4 PROGRAM OPTIONS. 



Ill THIS PROGRAM WILL SUPPORT TESTING OF MULTIPLE OLVll-E'S. r 

ifi REQUIRES THE ADDRESS OF THE FIRST RCSR (STORED MT 'IBASE' ) AND 

55p its interrupt vector (stored at 'IVECTl ), AND WILL BE ABLE 

pii TO address any DLV11-E starting AT THE SPECIFIED BASE ADDRESS 

i%l UP TO 16 CONSECUTIVE DEVICES. 

p|5 EXAMPLES: IBASE: 175610 

P26 >VECT1: 300 

lis THE PROGRAM WILL BE ABLE TO TEST ANY DLVll-E WITHIN THE 

229 ADDRESS RANGE 175610 --> 176000 

Is? IBASE AND IVECTl DEFAULT TO 175610 AND JOO RESPECTIVELY. 

252 THE PROGRAM ASSOCIATES UNIT NUMBERS AS FOLLOWS: (NUTfiERS IN 
2SS PARENTHESIS ARE OCTAL) 

254 UNIT«0 BASE ADDRESS STORED AT 'IBASE' 

255 ASSOCIATED BASE VECTOR STORED AT 'IVECTl' 

256 UNIT«1 BASE ADDRESS * (10) 

257 BASE VECTOR ♦ (10) 
236 i 

259 I UP TO 

24? UNITtlS BASE ADDRESS * (170) 
242 BASE VECTOR * (170) 

C4S 

244 LOCATION ' IDEVM' IS USED AS A BIT MAP TO INDICATE WHICH UNIT 

245 NUMBERS ARE PRESENT AND WILL BE TESTED. 
246 

247 BIT IS BIT 1 BIT 0 

246 

249 'UNIT! 'UNIT ! UNIT! 

250 ! 15 ! ! #1 ! #0 • 

251 

252 

253 A BIT MAP CAN BE ENTERED AT ' lOEVM' PRIOR TO STARTING THE 

254 PROGRAM. 
255 

256 EXAMPLE: 

257 IBASE: 175610 
256 IVECTOR: 300 
259 IDEVM: 13 
260 

261 THE PROGRAM WILL TEST- 
262 

263 UNIT«0 175610 300 

264 UNIT«1 175620 310 

265 UNIT«3 175640 330 
266 
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268 
269 
270 
2-'l 
272 
273 
274 
275 
276 
277 
278 
279 
280 
281 
262 
28S 
284 
285 
286 
287 
268 
269 
290 
291 
292 
293 
294 
295 
296 
297 
298 
299 
300 
301 
302 
305 
304 
305 
306 
307 
306 
309 
310 
311 
312 
313 
314 
315 
316 
517 
316 
S19 
320 
321 
322 
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OPTIONS 



LOCATION t'JSUR CONTAINS ALL THE USER SELECTABLE OPTIONS. THE 
VALUES IN THIS WORD MUST CONFORM TO THE ACTUAL BOARD 
CONFIGURATION. 

THE DEFAULT VALUE OF tUSUR IS AS FOLLOWS: 



POSITION 


DEFINITION 


DEFAULT 


VALUE 


0-5 


•OF DATA BITS 


10(8) - 


8 


4 


PARITY ENABLED 


0 


NO 


5 


EVEN ODD PARITY 


0 


ODD 


6 


COMMON SPEED 


1 


YES 


7 


PROGRAMMABLE BAUD RATE 


0 


NO 


6-11 


BAUD RATE OFFSET 


05(8) • 


110 BAUD 




(SEE FXLOUING NOTE) 






12 


BREAK GENERATION ENABLED 


1 


YES 


13 


CABLE TERMINATED (H315) 


1 


YES 


14 


(-FR) AND (-FD) JUMPERS IN 


1 


YES 


15 


(NOT DEFINED) 







NOTE 

THIS DIAGNOSTIC DOES NOT TEST THE PARITY LOGIC. 



UHEN T»C PROGRAMABLE BAUD RATE OPTION IS 
ENABLED T»€ PROGRAMABLE BAUD RATE TEST 
WILL EXIT WITH T»C BAUD RATE SET TO THE 
SELECTED VALUE. TO CHANGE THE DEFAULT 
VALUE OF 110 BAUD REPLACE BITS <11:8> 
WITH THE OFFSET INDICATED IN THE TABLE 
AT THE END OF THE PBR TEST. 



DLVll-E INDIVIDUAL TEST REQUIREMENTS 

fESfs"NOf"EXECUfED IF BIT - 



APT TEST (BIT 1 OF lENV) T25.T37 
PROGAMMABLE BAUD RATE (BIT 7 OF lUSUR) T52 
BREAK GENERATION CIRCUIT (BIT 12 OF tUSUR) T2.T40 
CABLE TERMINATED (BIT 13 OF lUSUR) T15.T16,T17.T20.T21 

T22.T23. PARTS OF T54. 
T36 

(-FR) e (-FD) JUMPERS IN (BIT 14 OF tUSUR) T5.T6.T16.T17.T20.T22. 

T23 

ALL OTHER TESTS UILL RUN REGARDLESS OF ANY BIT SETTINGS. 



1 
1 
0 
1 
1 
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324 2-5 EXECUTION TIMES. 

325 

526 EXECUTION TIMES ARE FOR AN LSI-11 PROCESSOR WITH ALL OPTIONS 

527 ENABLED ON THE DLVll-E (EXECPT FOR PROGRAMMABLE BAUD RATE). AT 
520 110 BAUC. 

529 

550 FIRST PASS- 90 SECONDS 

551 ADDITIONAL PASSES 95 SECONDS 

552 AOOITIONAl DEVICES 95 SECONDS 
555 

i54 THE TEST TIME IS BAUD RATE DEPENDANT i HIGHER BAUD GIVES 

535 SHORTER PASS TIMES. 

336 

557 
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356 3.0 ERROP INFORMATION. 

359 

540 

541 5.1 ERROR REPORTING PROCEDURE. 

542 

545 

544 SINCE THIS DIAGNOSTIC WAS DESIGNED TO FIT IN 4 K OF MEMORY THE 

545 ERROR TYPEOUT IS VERY BRIEF. THE FORMAT OF THE ERROR TYPEOUT 

546 IS AS FOLLOWS: 
547 

546 TEST* ERROR* .PC- ADDRESS- .VECTOR- 

549 

550 MHERE ALL VALUES TYPED ARE OCTAL. 

551 THE ADDRESS AND VECTOR REFER TO THE FAILING OLVll-E. 

552 FOR FURTHER IfTORMATION THE LISTING MUST BE CONSULTfcD. 

555 BITS 15.15.10 AND 9 OF THE SWITCH REGISTER CONTROL THE 

554 SEQUENCE OF EVENTS AFTER AN ERROR IS CAUGHT. 

555 

556 

557 BIT 15 - CAUSES THE PROGRAM TO HALT IN THE ERROR 

356 ROUTINE. CONTINUEING THE PROGRAM CAUSES IT TO 

559 PROCEED. 
560 

561 BIT 13 • DISABLES THE PRINTING OF THE ERROR MESSAGE. 

365 BIT 10 - CAUSES THE BELL TO RING ON ERROR. 

364 

365 BIT 9 - CAUSES THE DIAGNOSTIC TO LOOP FROM BEGINNING 

366 OF TEST TO ERROR. 
567 

566 THE ERROR ROUTINE SUPPORTS THE CONTROL G FUNCTION. 

569 

570 3.2 ERROR HALTS. 

571 

372 

573 THE ONLY HALT IN THIS DIAGNOSTIC IS IN THE ERROR ROUTINE. AND 

374 IS EXECUTED ONLY IF BIT 15 OF THE SWITCH REGISTER IS A ONE 

575 WHEN AN ERROR OCCURS. 
576 

377 4.0 PERFORMANCE AND PROGRESS REPORTS. 

576 

579 

360 4.1 PERFORMANCE REPORTS. 

561 

362 AS EACH DEVICE COMPLETES ONE PASS OF THE DIAGNOSTIC THE 

365 FOLLOWING WILL BE TYPED: 

36* CSR: .VECTOR: .ERRORS: 

565 
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386 UHERE.'CSR: ' IS THE DEVICE CS« UNDER TEST 

587 ' VECTOR :._• IS THE ASSOCIATED VECTOR 

388 AND 'ERRORS: ' IS THE TOTAL NUTSER OF ERRORS ON THIS DEVICE 

589 ON THIS PASS. 

590 

591 

592 NOTE 

595 THIS IS TYPED AFTER THE DEVICE HAS COMPLETED ITS PASS. 
594 

591. AFTER ALL DEVICES HAVE BEEN EXERCISED AN END PASS STATEMENT IS 

596 TYPED. 

397 "ENOPASS« " 



Li 
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396 S.O DEVICE INFORMATION TABLES. 

599 

400 

401 15 14 IS 12 11 10 9 6 7 6 S 4 3 2 1 0 

402 ••••*•••••••••••♦♦••••••••♦••♦♦•••••*••••••••••♦••••••••••••••••••••♦••••♦••••«*. 

403 PCSR!DATA!RING!CLR !CAR 'RCVR'REC ! ! !RCVR!RCVR!OATA! !SEC 'REQ !OTR ! • 

404 ;INT ! !SEND!OET 'ACT !REC ! ! !OONE!IE 'IE ! !XniT!SEND! ! ! 

405 ••*•♦♦••••••♦•••••••••••••••••♦••••••••••••♦••••••••••♦♦•••••••••»••••••♦••*•••.. 

406 RBUF!ERRO!OR !FR !P ! ! ! ! ! RECEIVED DATA BUFFER • 

407 !R !ERR !ERR !ERR ! ! ! ! ! • 
406 

409 TCSR! PROGRATtlABLE BAUD IPBR • • ! JXrilT'XMIT! • • IHAIN! }B«EA! 

410 ! RATE SELECT !ENAB! ! ! IRDY !IE ! ! • !T • !K f 

412 TBUF! •••!!!!! TRANGMITTER DATA BUFFER ! 

413 !••!:!•!! ! 

414 ******************************************************************«**«********«** 

415 
416 
417 

416 NOTE 
419 

420 BLANK BOXES INDICATE UNUSED AND RESERVED 

421 BIT POSITIONS. SEE THE LISTING FOR AN 

422 EXPLANATION OF THE BITS, 
423 

424 
425 
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426 6.0 SUMMARY OF TESTS AND SPECIAL SUBROUTINES. 

427 

428 

430 TEST 1 ADDRESSABILITY 

451 

Ill THIS TEST VERIFIES THAT THE ADDRESS AS PLACED IN THE 

434 HARDWARE P-TABLE TO BE CORRECT AND THE DLVll-E 

435 RESPONDS TO THAT ADDRESS SPACE. 
456 

457 THE FXLOUING 8 TESTS TEST ALL 'READ WRITE' BITS 
458 

459 
440 

441 TEST 2 BREAK • TCSRO SET. CLEAR. RESET 

442 

445 

444 

445 TEST 3 MAINT - TCSR2 SET. CLEAR. RESET 

446 

447 

446 

449 TEST 4 XMITIE - TCSR6 SET, CLEAR. RESET 

450 

451 

452 TEST S DTR - RCSRl SET. CLEAR 

453 

454 

455 

456 NOTE 
457 

458 RESET DOES NOT CLEAR THIS BIT. UE CANNOT TEST 

459 FOR AN INITIAL CONDITION AS THIS BIT IS 

460 UM)EFINEO UPON POWER UP AND INIT DOESN'T 

461 AFFECT IT. 
462 

465 
464 
465 

466 TEST 6 REQSENO - RCSR2 SET. CLEAR. RESET 

467 

466 

469 THIS TEST ASSUMES THAT JUMPER FR IS IN. 

470 

471 
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Nl 

SEQ IS 



TEST 7 SECXMIT - RCSR3 SET. CLEAR. RESET 



TEST 10 OATAIE - RCSR5 SET. CLEAR. RESET 



80 TEST 11 RCVRIE - RCSR6 SET. CLEAR, RESET 
1 
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SCO 14 



485 THE FXLOMINC 4 TESTS VERIFY THAT RESET (INIT) INITIALIZES 

484 READ (M.r BITS. 

465 

486 

48^ TEST 12 RCVROONE - RCSR 7 - IS CLEARED By INIT 

488 -- •- 

489 

490 

491 TEST 13 XMITROY - TCSR 7 - IS SET BY INIT 

492 

495 

494 

495 TEST 14 DATAINT - RCSR 15 - IS CLEARED BY INIT. 

496 

497 

498 

499 TEST 15 RCVRACT • RCSR 11 • 15 aEAREO BY INIT 

500 

501 

502 T»C FOLLOUING 4 TESTS VERIFY THAT T»C EIA SIGNALS CAN BE 

503 TRANSMITTED MO RECEIVED T»«OUGH T»C CABLE. 
504 

505 TEST 16 CMOET SETS AND CLEARS AS DTR SETS AND CLEARS 

506 

507 

508 

509 TEST 17 aRSEND SETS AND CLEARS AS DTR SETS AND CLEARS 

510 

511 

512 

SIS TEST 20 RING SETS AM) CLEARS AS REQSEND SETS AND CLEARS 

515 
516 

517 TEST 21 SECREC SETS AND CLEARS AS SECXniT SETS AND CLEARS 

518 . - . • - - 
519 

520 

S|l TEST 22 DATAINT (RCSR-15) SETS UHEN DTR CHANGES STATE AND THAT 

||3 DATAINT IS aEAREO AFTER READING RCSR 

525 

«* NOTE 

H5 DTR IS TIED TO BOTH CARDET AND CLRSENO BY THE 

529 H515. 

530 
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Is) TEST 2S DATAINT SETS UHEN RING SETS AND THAT QATAINT 

534 DOES NOT SET UHCN RING CLEARS 

555 
556 

55"' TEST 24 QATAINT SETS »*€N SEC«€C CHANGES STA't 

5M 

5S9 
540 
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54X TEST 25 XMIT ROT - TCSR 7 CLEARS WHEN TBUF IS LOADED 

542 

543 UITH A CHARACTER AND THAT IT SETS UITHIN A 

544 REASOHABLE AMOUNT OF TinE. 
545 

54^ TEST 26 OUTPUTTING A CH#P FROM TBUF (UITH MAINT SET) 

548 

549 RESULTS IN RCVRDONE SETTING UITHlN A 

550 REASONABLE AMOUNT OF TIME AND THAT RESET 

551 CLEARS THE BIT. 
552 

555 

554 TEST 27 RCVRDONE IS CLEARED BY READING R6UF 

555 

556 

557 TEST 50 RCVRACT * RCSR II - SETS UHEN A START BIT IS 

558 

559 RECEIVED AND CLEARS UHEN RCVRDONE - RCSR 7 - 

560 SETS 
561 

562 

565 TEST 31 OVERRUN BIT RBUF 14 

564 

565 
566 

567 TEST 32 PROGRAMMABLE BAUD RATE TEST TEST AT ALL SPEEDS 

5^ .... . . 

569 AVAILABLE A COMPARISON UILL BE MADE TO SEE IF 

570 NEW Tire IS LESS THAN PREVIOUS. 

571 
572 

575 TEST 35 TRANSMITTER INTERRUPT LXIC TEST 

574 

575 LOGICALLLY THIS IS 4 SEPARATE TESTS 

576 A) DOES TRANSMITTER INTERRUPT LOGIC WORK 

577 B) AT PRIORITY OF 0 
576 C) AND ONLY ONCE 

579 D) BUT NOT UITH INTERRUPT ENABLE CLEAR 

560 

581 

582 TEST 34 RECEIVER INTERRUPT LOGIC TEST THIS TEST COVERS ALL 

583 

584 OF THE RECEIVER SIDE OF THE INTERRUPT LOGIC. BOTH 

585 DATASET AND CHARACTER MODES. 
586 

587 

588 TEST 55 TEST ACTUAL DATA TRANSFERED NON- INTERRUPT 

589 

590 MAINTENANCE BIT SET 
591 

592 



E2 
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595 

594 

595 

596 

597 

598 

599 

600 

601 

602 

605 

604 

605 

606 

607 

608 

609 

610 

611 

612 

615 

614 

615 

6)6 

617 

618 

619 

620 

621 

622 

625 

624 

62S 

626 

627 

628 

629 

650 

651 

652 

655 

654 

655 
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SEQ 17 



TEST 56 TEST DATA THROUGH CABLE 

TEST 57 FULL DATA TRANSFER UITH INTERRUPTS AND MAINTENANCE 
MODE. 

TEST 40 TEST BREAK GENERATION LXIC TRANSMIT KNOtM CHAR 
UITH BREAK SET AND COMPARE RECEIVED UITH 0. 

TEST 41 NOT A TEST - SEND BACK TO LOOP 

NOTE 

FOR ALL OF THE FOLLOUING ROUTINES T»€ USE 
OF (RS) IS PART OF THE LINKAGE HECHANISH 
BETUEEN THE CALLER AND THE CALLED. 

ROUTINE: TIMER 



INPUTS: 



OUTPUT: 



THIS ROUTINE IS USED TO TEST THE STATUS OF 
ANY BIT IN ANY REGISTER. 

H0UL0N6 THE MAXinUM AMOUNT OF TIME TO 

SPEND IN THIS ROUTINE. 
UHIC»€IT A MASK UITH THE BIT(S) SET THAT 

ARE TO BE OCCKEO 
REG A POINTER TO THE REGISTER TO BE 

C»€CKED 

SFTCLR THE DESIRED RESULTS EITHER SET 

OR CLEAR 

THE 'C BIT IS SET TO INDICATE AN ERROR BUT IT 
IS TESTED BY THE IF. ERROR STATEMENT. 



F2 
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656 ROUTINE :DATLN6 

637 

650 THIS ROUTINE SETS UP A MASK FOR DATA. UITH 
659 

640 INPUT: NOTHING IS PASSED TO THIS ROUTINE BUT GLOBAL 

641 INFORMATION IS ASSUMED TO EXIST: 

642 IUSUR-- THE UORO FOR SOFTWARE PARAMETERS 

645 DATA-- A MASK FOR THE LOCATION OF THE OCTAL 
644 NUMBER OF DATA BITS 

645 

646 OUTPUT 

647 MASK-- A MASK OF BINARY ZEROS RIGHT -JUS TIF I ED 
640 THE NUMBER OF WHICH IS DEFINED IN lUSWR WORD. 
649 

650 

651 ROUTINE: WAIT 

652 

653 THIS ROUTINE IS USED TO DELAY EXECUTION OF THE 

654 MAIN PROGRAM FOR A SPECIFIED AMOUNT OF TIME. 

655 THIS IS ACCOMPLISHED BY INCREMENTING A 

656 REGISTER UP TO A lIMIT. THE irMER LOOP IS SET 

657 TO APPROXIMATE 1 MILLI SEC. 
650 

659 
660 

661 SERVICE ROUTINE: INTSRV 

662 

663 THIS GLOBAL ROUTINE DOES NOTHING BUT INCREMENT 
664 

665 

666 'INTFLAC' EACH TIME IT IS CALLED. IT ASSUMES 

667 THAT THE MAIN CALLING ROUTINE WILL KNOW WHAT 
666 TO LOOK FOR. 

669 
670 

671 ROUTINE :CYaE 

672 

673 THIS ROUTINE CAUSES AORS TO POINT TO THE 

674 ADDRESS OF DLVll-E UNDER TEST. AORS »2 TO 

675 POINT TO THE VECTOR OF THE OLVll-E UNDER TEST. 

676 IT KEEPS TRACK OF THE CURRENT DEVICE AND BIT 

677 MASKS. 



SEQ la 



G2 
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SEO 19 



678 

679 

680 

681 

682 

685 

684 

685 

686 

687 

688 

689 

690 

691 

692 

695 

694 

695 

696 

697 

698 

699 

700 

'01 

702 

705 

704 

705 

706 

707 

708 

709 

710 

711 

712 

715 

714 

715 

716 

717 

718 

719 

720 

721 

722 

725 

724 

725 

726 

727 

728 

729 

750 

751 

752 

755 



001100 



000011 
000012 
000015 
000200 
177776 

177774 
177772 
177570 
177570 



000000 
000001 
000002 
000005 
000004 
000005 
000006 
000007 
000006 
000007 



000000 



.TITLE MAINOeC-ZZ- CVOVA-0 
{•COPYRIGHT (C) 1977 
i*OIGITAL EQUIPMENT CORP. 
:»MAYN/M»0. WASS. 01754 
I* 

;*PROGRAH BY DOES CHQATE 
J* 

i*THIS PROGRAM UAS ASSEWLED USING THE P'^-ll HAINOEC SYSHAC 
, •PACKAGE (NAIN0EC-11-DZQAC-C5). JAN 19, 1977. 



»♦ 

.SBTTL 
«• 
: • 
; ♦ 


OPERATIONAL 
SWITCH 


SWITCH SETTINGS 
USE 


s* 


15 


HALT ON ERROR 


:* 


14 


LOOP ON TEST 


: • 


15 


INHIBIT ERROR TYPEOUTS 


; * 


11 


INHIBIT ITERATIONS 


1* 


10 


BELL ON ERROR 


t* 


9 


LOOP ON ERROR 


* 


8 


LOOP ON TEST IN SUR<7:0> 



.SBTTL BASIC DEFINITIONS 

(♦INITIAL ADDRESS OF THE STACK POINTER ••• 1100 *•• 
STACK- 1100 

•EOUIV EHT. ERROR i i BASIC DEFINITION OF ERROR CALL 

.EflUIV lOT. SCOPE iiBASIC DEFINITION OF SCOPE CALL 

t*NISCELLANEOUS DEFINITIONS 

HT- 11 tiCOOE FOR HORIZONTAL TAB 

LF- 12 i I CODE FOR LINE FEED 

CR- 15 kCOOE for CARRIAGE RETURN 

CRLF- 200 tiCOOE FOR CMRIAGE RETURN-LINE FEED 

PS- 177776 I (PROCESSOR STATUS UORO 



.EQUIV PS.PSU 
STKLMT- 177774 
PIRO" 177772 
OSUR- 177570 
OOISP- 177570 



1 1 STACK LIMIT REGISTER 

iiPftOGRAM INTERRUPT REQUEST REGISTER 

1 1 HARDWARE SWITCH REGISTER 

> (HARDWARE DISPLAY REGISTER 



(•GE»CRAL PURPOSE REGISTER DEFINITIONS 



RO- 


«0 


((GENERAL REGISTER 


Rl- 


*1 


((GENERAL REGISTER 


R2- 


«2 


((GENERAL REGISTER 


R5- 


«5 


((GENERAL REGISTER 


R4- 


1M 


({GENERAL REGISTER 


R5- 




( (GENERAL REGISTER 


R6- 


^ 


((GENERAL REGISTER 


R7. 


«7 


((GENERAL REGISTER 


SP- 


«6 


(1 STACK POINTER 


PC- 


«7 


((PROGRAM COUNTER 



(•PRIORITY LEVEL DEFINITIONS 

PRO- 0 ((PRIORITY LEVEL 



H2 
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000040 


PRl" 


40 


1 (PRIORITY LEVEL 


735 


000100 


PR2» 


100 


liPRIORITY LEVEL 


756 


000140 


PR5" 


140 


1 {PRIORITY LEVEL 


757 


000200 


PR4- 


200 


1 {PRIORITY LEVEL 


756 


00024C 


PP5- 


240 


n PRIORITY LEVEL 


759 


000300 


PR6- 


300 


liPRIORITY LEVEL 


740 


000340 


PR7- 


340 


1 {PRIORITY LEVEL 


741 










742 




••"SUITCH REGISTER" SUITCH DEFINITIONS 


745 


100000 


SU15- 


100000 




744 


040000 


SU14- 


40000 




745 


020000 


SW15- 


20000 




746 


010000 


SU12- 


10000 




747 


004000 


sun* 


4000 




746 


002000 


SUIO- 


2000 




749 


001000 


SU09- 


1000 




750 


000400 


SU08- 


400 




751 


000200 


SUO/- 


200 




752 


000100 


SU06- 


100 




755 


000040 


SU05- 


40 




754 


000020 


SU04- 


20 




755 


000010 


SU03- 


10 




756 


000004 


SU02- 


4 




757 


000002 


SUOl- 


2 




756 


000001 


SUOO- 


1 




759 




.EQUIV 


SW09,SU9 




760 




.EQUIV 


SU06.SU6 




761 




.EQUIV 


SW07,SU7 




762 




.EQUIV 


SU06.SU6 




765 




.EQUIV 


5U05.SU5 




764 




.EQUIV 


5U04.SU4 




765 




.EQUIV 


SU03.SU3 




766 




.EQUIV 


SU02.SU2 




767 




.EQUIV 


SUOl.SUl 




766 




.EQUIV 


SUOO.SWO 




769 








770 




i*DATA 


BIT DEFINITIONS 


(BITOO TO BIT15) 


771 


100000 


BIT15- 


100000 




772 


040000 


BIT14- 


40000 




775 


020000 


BIT13- 


20000 




774 


010000 


BIT12- 


10000 




775 


004000 


BITll- 


4000 




776 


002000 


BITIO- 


2000 




777 


001000 


BIT09- 


1000 




776 


000400 


BITOe- 


400 




779 


000200 


BIT07- 


200 




760 


000100 


BIT06- 


100 




761 


000040 


BIT05- 


40 




762 


000020 


BIT04- 


20 




765 


000010 


BIT05- 


10 




784 


000004 


BIT02- 


4 




785 


000002 


BITOl- 


2 




786 


000001 


BITOO- 


1 




767 




. EQUIV 


BIT09,BIT9 




786 




.EQUIV 


BITOB.BITe 




789 




.EQUIV 


BIT07.BIT7 





12 
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05:04 


BASIC DEFINITIONS 






790 






.EOUIV 


BIT06.BIT6 






791 






EQUIV 


BIT05 BITS 






79P 






! EOUIV 


BIT04.BIT4 






795 






.EQUIV 


BIT05.BIT5 






794 






.EJUIV 


BIT02.BIT2 






795 






.EOUIV 


BZTOl.BITl 






796 






.EQUIV 


BITOO.BITO 






797 
796 






1 •BASIC 


"CPU" TRAP VECTOR 


ADDRESSES 




799 


000004 




ERRVEC- 


4 1 


iTIHE OUT AND OTHER ERRORS 


800 


000010 




9ESVEC- 


10 1 


1 RESERVED AND ILLEGAL INSTRUCTIONS 


601 


000014 




TBITVEC-14 , 


i-T" BIT 




602 


000014 




TRTVEC- 


14 1 


1 TRACE TRAP 




603 


000014 




BPTVEC- 


14 1 


1 BREAKPOINT TRAP 


(BPT) 


804 


000020 




lOTVEC- 


20 t 


i INPUT/OUTPUT TRAP (lOT) **SCOPE** 


60S 


000024 




PWRVEC- 


24 1 


iPOUER FAIL 




806 


000050 




EMTVEC" 


50 t 


lEHULATOR TRAP (EMT) **ERRGR** 


807 


000054 




TRAPVEC 


•34 t 


i-TRAP" TRAP 




806 


000060 




TKVEC- 


60 i 


iTTY KEYBOARD VECTOR 


609 


000064 




TPVEC- 


64 1 


iTTY PRINTER VECTOR 


610 


000240 




PIRQVEC-240 i 


1 PROGRAM INTERRUPT REQUEST VECTOR 


611 


000004 






ILLMEM- 4 






612 


000001 






MORS- PI 






615 


000002 






GOOD- R2 






614 


000005 






BM)- R5 






615 


OOOOCl 






REGISTER-Rl 






616 


000002 






BIT- R2 






817 


000005 






FUNCT- R5 






818 


000002 






LEAD- R2 






819 


000004 






FOUOU- R4 






820 


175610 






OLAOOR- 175610 




821 














822 








1 THE FXLOUING DEFINITIONS APPLY TO THE GLOBAL SUBS 


825 


177777 






SET- -1 






824 


000000 






CLR- 0 






625 














626 














627 














626 








t RCSR REGISTER BIT NAMES 




629 














850 


100000 






DATAINT- 


BIT15 t 


DATASET INTERRUPT 


851 


040000 






RING- 


BIT14 , 


RINGING SIGNAL IM)ICAT0R 


652 


020000 






CLRSEND- 


BIT15 J 


CLEAR TO SEND FROM DATASET 


655 


010000 






CAROET- 


BIT12 t 


CARRIER DETECT 


654 


004000 






RCVRACT- 


BITll 1 


RECEIVER ACTIVE INDICATOR 


855 


002000 






SECREC- 


BITIO 1 


SECONDARY RECEIVE 


636 








t UNUSED 


BIT09 




857 








t UNUSED 


BIT08 




856 


000200 






RCVRDONE- 


BIT07 I 


RECEIVER DONE 


659 


000100 






RCVRIE- 


BIT06 t 


RECEIVER INTERRUPT ENABLE 


640 


000040 






DATAIE- 


BIT05 t 


DATASET INTERRUPT ENABLE 


641 








1 UNUSED 


BIT04 




642 


000010 






SECXMIT- 


BIT03 t 


SECONDARY TRANSMIT DATA 


645 


000004 






REQSEND- 


BIT02 t 


REQUEST TO SEND 


844 


000002 






DTR- 


BITOl i 


DATA TERMINAL READY 


845 








t UNUSED 


6IT00 





J2 
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046 

847 I }••••*•••****•*****«*******************»••••*••**•••*•••**••*••• 

648 I R6UF REGISTER BIT NAMES 

S49 ,,•••••••••»•»»••••••••••••»»*•»•»•*•»••••«•••••••»•••«••••♦»♦««* 

650 100000 ERROR- BIT15 i ERROR INDICATOR 

651 040000 ORERR- 6IT14 ; OVERRUN ERROR 

652 020000 FRERR- BIT13 t FRAMING ERROR 
65S 010000 PERR- BIT 12 i PARITY ERROR 

654 I UNUSED 6IT11 

655 I UNUSED BITIO 

656 i UNUSED BIT09 

657 i UNUSED BIT08 

656 000200 RDATA7- BIT07 i \ 

659 000100 RDATA6- BIT06 i ! 

660 000040 RDATA5- BIT05 t ! 

661 000020 R0ATA4- PIT04 s \ RECEIVED DATA BITS 

862 000010 RDATAS- BIT03 / 
663 000004 RDATA2- BIT02 ! 
864 000002 ROATAl- BITOl I 
665 000001 ROATAO- BITOO : / 
866 

867 

866 J TCSR REGISTER BIT NAMES 

869 1 1 ••♦•♦••••*••*♦•••••••♦••♦••**»••♦••♦»•♦•••••••••*••••*•••*••♦•• 

670 100000 PBAUD3- BITIS ; \ 

671 040000 P6AUD2- BIT14 \ PROGRAMMABLE BAUD 
872 020000 P6AUD1' BIT13 ; / RATE BITS 

673 010000 P6AUD0- BIT12 ; / 

674 004000 P6AU0SET- BIT 11 ; ENABLE SETTING OF 

675 : PROGRAMMABLE BAUDE RATE 

876 i UNUSED BITIO 

877 i UNUSED BIT09 
876 i UNUSED BIT06 

879 000200 XMITROY- BIT07 , TRANSMITTER READY 

880 000100 XMITIE- BIT06 i TRANSMITTER INTERRUPT ENABLE 

661 i UNUSED BITOS 

662 : UNUSED 6IT04 

863 i UNUSED BIT03 

884 000004 MAINT- BIT02 i MAINTENANCE SET BIT 

665 i UNUSED BITOl 

866 000001 BREAK- BITOO t SEND BREAK (CONTINUOUS SPACE) 

667 

888 

869 , J 

390 , TBUF REGISTER BIT NAMES 

891 J 5 

892 i UNUSED BIT 15 



K2 
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: UNUSED 


BIT14 




1194 








1 UNUSED 


BIT13 












1 UNUSED 


BIT12 












1 UNUSED 


BITll 




69 7 








: UNUSED 


BITIO 




896 








1 UNUSED 


BIT09 




£99 








i UNUSED 


BIT06 




900 








T0ATA7- 


BIT07 


t \ 


901 








TDATA6- 


BIT06 


. 1 


902 




000040 




TDATA5- 


BIT05 


. I 


905 




000020 




TDATA4- 


BIT04 


t \ TRANSMITTER DATA BUFFER 


904 




000010 




TDATA3- 


BIT03 


; / 


90S 




000004 




TDATA2- 


BIT02 


1 


906 




000002 




TDATAl- 


BITOl 


, 1 


907 




000001 




TDATAO- 


BITOO 


1 / 


906 














909 














910 














911 








j FLAG BITS TO BE USE OR 


CLEARED IN lUSUR. 


912 














913 




000017 




DATA - 


17 




914 




000020 




PARITY - 


20 




915 




000040 




EVENOOD - 


40 




916 




000100 




COflSPO ■ 


100 




917 




000200 




P8R - 


200 




916 














919 








i BAUOE nuST 


BE ON THE UPPER 


920 








i BYTE BOUNDRY OF IUSUR.--4 BITS 


921 




007400 




BAUD - 


7400 




922 




010000 




BRK - 


10000 




923 




020000 




CABLE - 


20000 




924 




040000 




FRFO " 


40000 




92S 














926 








.S8TTL TRAP CATCHER 






927 














926 




000000 




.-0 






929 








i*ALL UNUSED LOCATIONS FRCH 4 - 


776 CONTAIN A ".♦2. HALT" 


930 








i*SEaUENCE TO CATCH ILLEGAL TRAPS A»0 INTERRUPTS 


931 








(•LOCATION 0 CONTAINS 0 


TO CATCH 


IMPROPERLY LOADED VECTORS 


932 




000174 




.-174 






933 


0001 74 


000000 




DISPREG: .WORD 0 




ii SOFTWARE DISPLAr REGISTER 


934 


0001 76 


000000 




SUREG: .UORD 0 




It SOFTWARE SUITCH REGISTER 


9?«^ 








.S8TTL STARTING AOORESS(ES) 




*tJb 


000200 


000137 


001336 


JMT 8*START 


i i JUtf> TO STARTING ADDRESS OF PROGRAM 


937 








.SBTTL ACTll HOOKS 






936 














939 














940 








iHOOKS REQUIRED BY ACTll 






941 




000204 




•SVPC-. 




(SAVE PC 


942 




000046 




.-46 






943 


000046 


012452 




»EN0A0 




(il)SET L0C.46 TO ADDRESS OF lENDAD IN 


944 




000052 




.-52 






945 


000052 


000000 




.UORO 0 




1 j2)SET L0C.52 TO ZERO 


946 




000204 




•■♦SVPC 




it RESTORE PC 


94-' 




001000 




.-1000 






948 








. SBTTL APT PARAMETER BLOCK 





SEQ 23 
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SEQ 24 



949 
950 
951 
952 
955 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
966 
969 



000024 
000044 



001000 
001000 
001002 
001004 
001006 
001010 
001012 



001000 
000024 
000200 
000044 
001000 
001000 



000000 
001174 
000005 
000055 
000036 
000030 



iSET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 



: I 



.IX-. 


it SAVE CURRENT LOCATION 


-24 


11 SET POUER FAIL TO POINT TO START OF PROGRAM 


200 


iiFOR APT START UP 


.-44 


M POINT TO APT INDIRECT ADDRESS PNTR. 


lAPTHDR 


itPOINT TO APT HEADER BLOCK 


.-.♦X 


tiRESET LOCATION COUNTER 



I SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-POPll DIAGNOSTIC 
I INTERFACE SPEC. 



lAPTHD 
IHIBTS 
irSAOR 
♦TSTM: 
IPASTM 
lUNITM 



.yORD 0 iiTUO HIGH BITS OF 18 BIT MAILBOX ADDR. 

.UORO IMAIL It ADDRESS OF APT MAILBOX (BITS 0-15) 

.UORO 5 tiRUN TIM OF LONGEST TEST 

.UORO <5. jiRUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

.yORO 30. itAODITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 

.UORO >ETEND- •MAIL/2 ii LENGTH MAILBOX -ETABLE(M)ROS) 



M2 
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COMHON 


TAGS 




970 






.S8TTL 


comoN 


TAGS 


971 












972 












973 






i*TMIS 


TABLE CONTAINS ^ 


974 






i*USEC 


IN THE PROGRAM. 


975 












976 




001100 




.-1100 




977 


001100 




ICriTAG: 




978 


001100 


000000 




.UORO 


0 


979 


001102 


000 


•TSTNM: .BYTE 


0 


960 


001103 


000 


lERFLG: .BYTE 


0 


961 


001104 


000000 


IICNT: 


.UORO 


0 


962 


001106 


000000 


tLPAOR 


.UORO 


0 


963 


001110 


000000 


•LPERR 


.UORO 


0 


964 


001112 


000000 


♦ERTTL 


.UORO 


0 


965 


001114 


000 


»ITEf« 


.BYTE 


0 


966 


001115 


001 


tERnAX 


.BYTE 


1 


967 


001116 


000000 


lERRPC 


.UORO 


0 


966 


001120 


000000 


IGOAOR 


.UORO 


0 


969 


001122 


000000 


tBOAOR 


.UORO 


0 


990 


001124 


000000 


IGODAT 


UORO 


0 


991 


001126 


000000 


IBODAT 


. .UORO 


0 


992 


001130 


000000 




.UORO 


0 


993 


001132 


000000 




.UORO 


0 


994 


001134 


000 


•AUTOS 


. .BYTE 


0 


995 


001135 


000 


IINTAG: .BYTE 


0 


996 


001136 


000000 




.UORO 


0 


997 


001140 


177570 


cup> 


.UORO 


OSUR 


996 


001142 


177570 


DISPLAY: .UORO 


OOISP 


999 


001144 


177560 


♦ TKS: 


177560 




1000 


001146 


177562 


tTKB: 


177562 




1001 


001150 


177564 


ITPS: 


177564 




1002 


001152 


177566 


♦TPS: 


177566 




1003 


001154 


000 


•NULL: 


.BYTE 


0 


1004 


001155 


002 


♦FILLS 


.BYTE 


2 


1005 


001156 


012 


♦FILLC 


.BYTE 


12 


1006 


001157 


000 


ITPFLG 


.BYTE 


0 


1007 


001160 


000000 


♦TIMES 


0 




1006 


001162 


000000 


•ESCM>E:0 




1009 


001164 


177607 000377 


•BELL: 


.ASCIZ 


<207>< 


1010 


001170 


077 


•QUES: 


.ASCII 


/?/ 


loil 


001171 


015 


•CRLF: 


.ASCII 


<15> 


1012 


001172 


000012 


•LF: 


.ASCIZ 


<12> 


1013 












1014 






.SBTTL 


APT MAILBOX-ET 


1015 












1016 












1017 






.EVEN 






1016 


001174 




•MAIL: 






1019 


001174 


000000 


♦MS6TY 


.UORO 


AMSGTY 


1020 


001176 


000000 


•FATAL 


.UORO 


AFATAL 


1021 


001200 


000000 


•TESTN 


.UORO 


ATESTN 


1022 


001202 


000000 


•PASS: 


.UORO 


APASS 


1023 


001204 


000000 


•OEVCT: .UORO 


AOEVCT 


1024 


001206 


000000 


•UNIT: 


.UORO 


AUNIT 


1025 


001210 


000000 


•MSGAP: .WORD 


AMSGAD 



1 1 START OF COMMON TAGS 

i I CONTAINS THE TEST NUMBER 

i {CONTAINS ERROR FLAG 

t {CONTAINS SUBTEST ITERATION COUNT 

i {CONTAINS SCOPE LOOP ADDRESS 

{ {CONTAINS SCOPE RETURN FOR ERRORS 

((CONTAINS TOTAL ERRORS DETECTED 

((CONTAINS ITEM CONTROL BYTE 

((CONTAINS MAX. ERRORS PER TEST 

((CONTAINS PC OF LAST ERROR INSTRUCTION 

((CONTAINS ADDRESS OF GOOD' DATA 

((CONTAINS ADDRESS OF 'BAD' DATA 

((CONTAINS 'GOOD' DATA 

({CONTAINS 'BAD' DATA 

(I RESERVED- -NOT TO BE USED 

: (AUTOMATIC MODE IWICATOR 
({INTERRUPT NODE INDICATOR 

({ADDRESS OF SWITCH REGISTER 
({ADDRESS OF DISPLAY REGISTER 
((TTY KBD STATUS 
{(TTY KBD BUFFER 

{(TTY PRINTER STATUS REG. ADDRESS 
((TTY PRINTER BUFFER REG. ADDRESS 
((CONTAINS NULL CHARACTER FOR FILLS 
((CONTAINS « OF FILLER CHARACTERS REQUIRED 
((INSERT FILL CHARS. AFTER A "LINE FEED" 
({"TERMINAL AVAILABLE" FLAG (BIT<07>-0-YES) 
((MAX. NUMBER OF ITERATIONS 
{ (ESCAPE ON ERROR ADDRESS 
((CODE FOR BELL 
( (QUESTION MARK 
({CARRIAGE RETURN 
( (LINE FEED 



(APT MAILBOX 
(MESSAGE TYPE CODE 
{FATAL ERROR NUMBER 
(TEST NUMBER 
(PASS COUNT 
(DEVICE COUNT 
(I/O UNIT NUMBER 
(MESSAGE ADDRESS 



N2 
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SEQ 26 



CVOVAU. 


rll 


t 3 d ■ 44 AS • A4 


APT MAILBOX -ETABLE 


1026 


001212 


AAAAAA 


•nSGLG: .UORD 


AnSGLG 


102 ' 


/V\1 ^ 




•ETABLE: 


AENV 


lUcO 


WXcX* 


AAA 


fcfiv : 


RVTP 




lA/Xc X3 




f CHvn : 


RYTP 


AENVn 


f n 


AA191lt 






unoA 


ASUREG 




V^XCCV 


071110 


*l ICUD . 

•USMK : 


. WUHU 


AUSUR 




OA 1999 


www 


*f*Di ICO 


ucon 

. MUnU 


ACPUOP 








s • 












i • 












a A 
> • 












:♦ 












I* 












I* 








(Ml 994 






.DT It 


AMAMSl 




AA1 99'( 


AAA 


AMTVDl 

•ni iKi 


BVTC 
.DT It 


AMTYPl 








t* 












I* 












J* 






1 AAA 












1 MS 


AA199#t 


AAAAAA 




. MUNU 


AflAORl 








I* 






1M7 
XV^ f 


AA19V) 


AAA 

WW 




BVTC 
• DT IC 


AnAnS2 




^A/XC JX 


AAA 


iMTVP9 


BYTP 
.D< It 


AMTYP2 




001919 


AAAAAA 
www 




unon 


AnA0R2 




(V)19XA 


AAA 
^^^^ 


f 1 Ml UO 


RYTP 
• DT It 


AflAf ..jS 


1 AS1 


0A193S 

%A/XC^^ 


AAA 


•ni Trj 


.DT It 


AMTYPS 


XV 




AAAAAA 


iriAORS 


.UORO 


AnA0R3 


XVJ J 


(M19AA 


AAA 
wv 


IMAnS4 


.BYTE 


AHAT ^ 


XV 


OA19A1 


AAA 
wv 


♦MTYP4 


.BYTE 


AMTYP4 


IMS 

X VJ^ 


OA1 949 


AAAAAA 
www 




.UORD 


AnADR4 


xv^o 


AA1 944 


AAAXAA 


•VECTl 


.UORO 


AVECTl 


1057 


001946 


AAAAAA 

wVWW 


IVECT2 


.yoRD 


AVECT2 


1056 


001250 


175610 


IBASE: 


.UORO 


ABASE 


1059 


001252 


000001 


•OEVn: 


.UORD 


ADEVn 


1060 


001254 




tETEND: 




1061 






.MEXIT 







i t MESSAGE LENGTH 
it APT ENVIRONMENT TABLE 
1 1 ENVIRONMENT BYTE 
I tENVIROftCNT NODE BITS 
tiAPT SWITCH REGISTER 
iiUSER SWITCHES 
jjCPU TYPE. OPTIONS 
BITS 15-11-CPU TYPE 

11/04-01 . 11/05-02 . 11/20-03 . 11/40-04 . 11/45-05 

1 1 /70-06 . POQ-07 .0-10 
BIT 10-REAL TIME CLOCK 
BIT 9-FLOATING POINT PROCESSOR 
BIT 8-MEnORY MANAGEMENT 
itHiGH ADDRESS. M.S. BYTE 
liMEM. TYPE.BLK#1 
MEM. TYPE P TE -- (HIGH BYTE) 

900 NSEC CORE-001 

300 NSEC BIPXAR-002 

500 NSEC NOS-003 
tiHIGH A0DRESS.BLK«1 

MEM. LAST ADOR.-S BYTES. THIS UORO AND LOU OF "TYPE" ABOVE 
itHIGH ADDRESS. M.S. BYTE 
iiMEM.TYPE.BLK#2 
ttMEM.LAST ADDRESS. 3LK*2 
ttHIGH ADDRESS. M.S. BYTE 
tiMEM.TYPE.BLK#3 
it MEM. LAST ADDRESS. BLK«S 
tiHIGH AD9RESS.M.S.BY1E 
t iMEM.TYPE.BLK#4 
ttMEM.LAST ADDRESS. BLKM 
i {INTERRUPT VeCTOR«l.BUS PRI0RITY«1 
it INTERRUPT VECT0R#2BUS PRI0RITY«2 
t iBASE ADDRESS OF EQUIPMENT UNDER TEST 
tiDEVICE MAP 



B3 



CVOVAO.Pll 12 Mi 



I0b2 
1065 
1064 
1065 
1066 
1067 
1066 
1069 
1070 
1071 
1072 
107S 
1074 
1075 

1076 001254 

1077 

1070 001254 175610 
1079 001256 000300 
lOSO 001260 175610 
1061 001262 175612 
10S2 001264 175614 
lOeS 001266 175615 
1084 001270 175616 

1065 001272 000000 

1066 001274 000020 

1067 001554 000000 
1066 001556 

1069 
1090 

1091 001556 012706 

1092 001542 005026 
1095 001544 022706 

1094 001550 001574 

1095 001552 012706 
1096 

1097 001556 012757 

1096 001564 012757 

1099 001572 012757 

1100 001400 012757 

1101 001406 012757 

1102 001414 012757 
1105 001422 012757 

1104 001450 012757 

1105 001456 016767 

1106 001444 005067 

1107 001450 005067 
1106 001454 112767 

1109 001462 012767 

1110 001470 012767 
1111 

1112 

1115 001476 015746 

1114 001502 012757 

1115 001510 012767 

1116 001516 012767 

1117 001524 022777 
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84 05:04 EMOR POINTER TABLE 

.SeTTL ERfNlff POINTER T46LE 



SCO 27 



001100 

001140 

001100 

014574 
000S40 
014174 
000540 

015S26 
000540 
012506 
000540 
010756 
177510 
177506 
000001 
001462 
001470 



000004 
0015S6 

177570 
177570 
177777 



000020 
000022 
000050 
000052 
000054 
000056 
000024 
000026 
010746 



177455 
177416 
177412 



000004 

177422 
177416 
177406 



I*THIS TABLE CONTAINS T»€ I^rORriATION fOi EACH ERROR THAT CAN OCCUR. 

i*T»€ UrOmiATION IS OBTAINED BY USING T»€ IICEX NUr«ER fOUK) IN 

i*L0CATI0N IITE»e. THIS NUr«ER INDICATES UHICH ITEM IN T»C TABLE IS PCRTIICNT. 

i«NOTEl: If lITEre IS 0 T»C ONLY PCRTIICNT DATA IS (lERRPC). 

(•N0TE2: EACH ITEH IN T»C TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 



«• 
»• 
«• 

I* 



EH 
OH 
OT 
OF 



I iPOINTS TO T»C ENMR MESSAGE 

i I POINTS TO T« DATA »CAOER 

1 1 POINTS TO T»C DATA 

iiPOINTS TO T»C DATA FORMAT 



lERRTB: 

n GLOBAL DATA 

XAOD: OLAOOR 
OLVEC: 500 
RCSR: XAOOR • 0 
R8UF: OLAOOR • 2 
TCSR: OLAOOR • 4 
TCSRHI: OLAOOR • 5 
T6UF: OLAOOR • 6 
I: 0 

.BLKU 20 iFOR RS STACK 
RSSTACK: .tlORO 0 
START: 

.SBTTL INITIALIZE T»C COmON TAGS 
iiaEM T»C COmON TAGS (ICHTAG) AREA 



nov 
aR 

CMP 



MOV 

M INITIALIZE A 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

aR 
aR 

MOVB 
MOV 
MOV 
nSIZC FOR A 
iiEOUAL rO A 
MOV 
MOV 
MOV 
MOV 
CMP 



I {FIRST LOCATION TO BE CLEARED 
itaEAR MEMORY LOCATION 

ilLOOP BACK IF NO 

1 1 SETUP TIC STACK POINTER 



••CHTAG.R6 
(II6)* 

•SUR.R6 iiOOIC? 
.-6 

•STACK. SP 
FEU VECTORS 

••SCOPE. ••lOTVEC tilOT VECTOR FOR SCOPE ROUTINE 
•S40.B6Z0TVCC*2 i i LEVEL 7 

••EMOI.BMENTVEC i lEMT VECTOR FOR ERROR ROUTINE 
•940.8fCnTVEC*2 1 1 LEVEL 7 

••TIMP.a6TfU#VCC iiTRAP VECTOR FOR TRAP CALLS 
«940.t6TIUIPVCC*2iLEVEL 7 
•IPIMM.BMIVEC I iPOUER FAILURE V^CTC» 
•S40.BfPlilVEC*2 iiLEVCL 7 

•EtCCT.ICOPCT 1 1 SETUP EM) -OF -PROGRAM COUNTER 
ITIMES I {INITIALIZE NUTQER OF ITERATIONS 

lESCAPE iiaEAR T»C ESCAPE ON ERROR ADDRESS 

•l.lERmx 1 1 M.LOU ONE ERROR PER TEST 

• ..ILPAOR I {INITIALIZE T»C LOOP ADDRESS FOR SCO*' 

•..ILPCRR iiSETUP THE ERROR LOOP ADDRESS 

iW n OKA WC SWITCH REGISTER. IF NOT FOUND OR IT IS 
SETUP FOR A SOFTWARE SWITCH REGISTER. 



8#EIWVCC.-(SP) 
•64l.8tEPRVEC 

•DSWR.SWR 
•OOISP. DISPLAY 
• l.BSUR 



1 1 SAVE ERROR VECTOR 
1 1 SET UP ERROR VECTOR 
llSETUP FOR A HARDWARE SUICH REGISTER 
11 AND A H A nO WA WC DISPLAY REGISTER 
1 1 TRY TO REFERENCE HARDWARE 3UR 



C3 
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SEQ 20 



1118 
1119 
1120 
1121 
1122 
1125 
1124 
1125 
1126 
1127 
1126 
1129 
liSO 
1151 
11S2 
1155 
11S4 
1155 
1156 
1157 

use 

1159 
1140 
1141 
1142 
1145 
1144 
1145 
1146 
1147 
1146 
1149 
1150 
1151 
1152 
1155 
1154 
1155 
1156 
1157 
1156 
1159 
1160 
1161 
1162 
1165 
1164 
1165 
1166 
1167 
1166 
1169 
1170 
1171 
1172 
117^ 



001552 


001012 










001554 


000405 








BR 


001596 


012'16 


0015** 




1 ■ 




001542 


000002 






03» I 


RTT 


001544 


012 'O ' 


uuvi 'O 


i ' r 300 




00155c 


012 '6 ' 




Iff JDc 




HOW 


001560 


At W 

012697 






oof : 


MflV 


001564 


005067 


177412 






aR 


001570 


152767 


000200 


177417 




BITB 


001576 


001405 








BEQ 


001600 


012767 


001216 


177552 


671: 


NOV 


001606 
















.S8TTL 


TYPE 



001764 
001764 
001772 
001772 
002000 
002006 



661 

65 » 

•65».(SP) 



, I BRANCH IF NO TIMEOUT TRA^ OCCURRED 
I (AND T« H A R OttA iC SWR IS NOT • • 1 
, (BRANCH IF NO TI»€OUT 
It SET UP FOR TRAP RETURN 



•fURCG.SUR iiPOINT TO SOFTUARE Sm 

•OISPREG, 01 SPLAT 

(SP)*.S«ERRVEC 1 1 RESTORE ERROR VECTOR 



•PASS 

•APTSIZE.IENVn 
671 



itaEM PASS COUNT 
1 1 TEST USER SIZE UNDER APT 
iiYES.USE NON-APT SWITCH 
iiNO.USE APT SWITCH REGISTER 



1 1 TYPE T»€ MVC OF THE PROGRAM IF FIRST PASS 

iiFIRST TI»€? 
iiBRANCH IF NO 
ilACT-117 
IiBRANCH IF YES 
11 TYPE ASCIZ STRING 



001606 


005227 


177777 






INC 


• 1 


001612 


001051 








BIC 


661 


001614 


022757 


012452 


000042 






•IEN0A0.RM2 


001622 


001445 








BEQ 


661 


001624 


104401 


001672 






TYPE 


.691 






.S8TTL 


GET VALUE FOR SOFTUARE 


001650 


005757 


000042 






TST 


M42 


001654 


001012 








BNE 


70$ 


001656 


126727 


177552 


000001 






IENV.«1 


001644 


001406 








BEQ 


70$ 


001646 


026727 


177266 


000176 




CTP 


SWR.9SWREG 


001654 


001005 








BNE 

GTSUR 


71$ 


001656 


104406 








71$ 


001660 


000405 








BR 


001662 


112767 


000001 


177244 


701: 


NOVB 


•I.IAUTOB 


001670 








711: 


BR 


661 


001670 


000422 














Ii69t: 


.ASCIZ 


<CRLF>«ZZ-CVOVA 


001756 








661: 






001756 












LET INITFLAG :■ 


001796 


012767 


000001 


010410 




MOV 


•l.INITFLAG 


001744 








LOOP: 






001744 










CALL 


CYCLE 


001744 


004767 


010254 






JSR 


PC. CYCLE 


001750 












(AORS)*.0LA0O 


001750 


012167 


177500 






MOV 


001754 












(AORS),0LVEC 


001754 


011167 


177276 






MOV 


001760 












OLAOO.ADRS 


001760 


016701 


177270 






MOV 



iiMK UE RUM«ING UNDER XXOP/ACT? 
IiBRANCH IF YES 
iiMK UE RUNNING UNDER APT? 
iiBRMCH IF YES 

iiSOFTUME SWITCH REG SELECTED? 
IiBRANCH IF NO 

iiGET SOFT-SUR SETTINGS 

iiSET AUTO-MODE I»CICATOR 

iiGET OVER T« ASCIZ 
■0 r.LVll-E OFFLINE TEST»<CRLF> 



•1 



NO ARGUMENTS- -AOORS -> NEXT ADORfSS 



016767 177264 177266 



016767 
062767 



177256 
000002 



177262 
177254 



MOV 

MOV 
AOO 



OLAOD.RCSR 

OLADO.RBUF 
•2.RBUF 



LET 

LET 
LET 

LET 
LET 

LET 



ADDRS.2 > NEXT VECTOR 
jGET UNIT AOORtSS 
DLADO (ADfiS)» 

iGET UNIT VECTOR 
OLVEC :■ (AORS) 



AORS 

jRCSR 
RCSR 

RBUF 



TCSR 



- DLADO 

' DLADO • 0 

• DLADO 

• DLADO . 92 



• DLADO . «4 



D3 
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1174 

1175 
1176 
1177 

1178 
1179 
1160 
1161 
1162 
1165 
1164 
1165 



002006 
002014 
002022 
002022 
0020S0 
002056 
0020S6 
002044 
002052 
002052 

002056 



016767 
062767 

016767 
062767 

016767 
062767 

012705 

000005 



177242 
000004 

177226 
000005 

177212 
000006 

001354 



177250 
177242 

177236 
177250 

177224 
177216 



MOV OLAOO.TCSR 

AOO #4.TCSR 

MOV DLAOO.TCSRMI 

ADD ♦S.TCSRMI 

MOV OLAOO.TBUF 

AOO #6.T9ur 

MOV •R5STACK.R5 

RESET 



LET 
LET 
LET 



SEO 29 



TCSRHI OLAOO • •5 

TBUF :- OLADO • H> 

R5 :- tRSSTACK 
uBRESET 



t5 
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SEO 



1186 








1187 








1188 








1189 








1190 








1191 








1192 


002060 


000004 




1193 


002062 


012767 


000002 


1194 


002070 


012767 


000001 


1195 


002076 






1196 


002076 


016701 


177152 


1197 








1198 


002102 






1199 


002102 


010146 




1200 


002104 


012701 


AAAAAA 

000004 


1201 


002110 


012721 


A4 ^AV^ 

012092 


1202 


002114 


012711 


AAAV^ A 

000940 


1203 


002120 


A4 A 4 

012601 




1204 


002122 






1205 


002122 


AAK A^ ^ 

005067 


« t MM 

177144 


1206 


002126 






1207 


002126 






1208 


002126 






1209 


002126 


A 4 *V 

012767 


002194 


1210 








1217 


002154 






1212 


002194 


005067 


007700 


1213 








1214 








1215 


AA1 4 ^ /\ 

002140 


A^^K ^44 

005711 




1216 


002142 






1217 


002142 


005767 


AA^f 

007672 


1218 


002146 


001401 




1219 










002150 






1221 


AA*^ • S A 

002150 


104001 




1222 


AA*\ « K 

002152 






122S 


002152 






1224 


AAt • V% 

002152 






1225 


002 1>2 






1226 


AA'^ 4 0*% 

002152 


062767 


000002 


122 ' 


002160 






1228 


002160 


A 4 X ^ A 4 

016701 


177070 


1229 


002164 


n0 f ^A4 

066701 


4 4 A'^ 

177102 


1290 


002170 






1231 


0021 '0 


A^^ '^^'^ 

026727 


177076 


1232 


002176 


001959 




1239 


OO2200 






1294 


0O22O0 


At Al MK. 

010146 




Is 39 


UWccVc 






1236 


002204 


012701 


000004 


1237 


002210 


010102 




1258 


002212 


062702 


000002 


1239 


002216 


010221 




1240 


002220 


005011 




1241 


002222 


012602 





I •TEST 

!• 
I* 
I* 

TSTl: 



AOORESSABILITY 

THIS TEST VERIFIES THAT THE ADDRESS AS PLACED IN 

T»€ HARDWARE P-TABLE TO BE CORRECT AND T»C DLVll-E RESPOM)S 

TO THAT ADDRESS SPACE 



»1; 



»2: 



SCOPE 

HDV 

MOV 

MOV 



MOV 
MOV 
MOV 
MOV 
MOV 

CLR 



MOV 



CLR 



♦2. » TIMES 
♦l.fTESTN 

OLAOO.ADRS 



Rl.-(SP) 

•ILLMEM.Rl 

♦I«TSRV.(R1)» 

#PR7.(Rl) 

(SP)».R1 



•64t.lLPEftR 
INTFLAG 



I lOO 2 ITERATIONS 
it SET TEST NUMBER IN APT MAIL BOX 
LET ADRS DLADD 

I SET UP INTERRUPT 
SETVEC #ILLMEM.#INTSRV.#PR7 



LET I : 
REPEAT 

BGNSUB 



«0 



.CLEAR FLAG 
LET INTFLAG 



•0 



TST 8A0RS 



TST 
BED 



ERROR 



ADD 

MOV 
ADD 

CMP 
BNE 

MOV 
MOV 
MOV 
MOV 
ADD 
MOV 
CLR 
MOV 



INTFLAG 
t2 



iREAD FLAG 

IF INTFLAG NE 40 THEN 



FATAL ERROR 
ERRDF 1..N0DL 



ENDIF 



♦2.1 

Dt.ADD.ADRS 
I. ADRS 

1. 48. 

tl 

Rl.-CSP) 

R2.-(SP) 

♦ILLMEM.Rl 

R1.R2 

•2.R2 

R2.(R1)» 

(Rl) 

(SP)».fl2 



ENDSUB 
LET I 



LET 

UNTIL I EQ 48 



CLRVEC ILLMEM 
1 1 PUSH Rl ON STACK 
1 1 PUSH R2 ON STACK 



ttPOP STACK INTO R2 



I • 42 

ADRS :- DLADO 



F3 

SEQ 31 
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1242 002224 012601 HOV (SP)..Rl ^TACK INTO Rl 

I END OF TEST 

1244 002226 ENOTST^ 

[lit !**THE*FOLLOUING 6 TESTS TEST ALL 'READ URITE' BITS 

124 7 ,,•••••••••••••♦•••••••••••••••••••••♦••••••••••••••••••••••< 

1240 
1249 



G3 





ZZ -CVOVAO 


HACYll 




D1 1 


13. Ml .114 


05:04 


IPSO 
















lc3c 
























1P55 














000010 








000002 
























010000 


lev A 
















1365 




Ol 37#«7 


000001 


1364 
















1366 








1367 








136A 








1369 






002272 


1370 








1371 

AK ' • 


W/CC ' c 






1273 


Wcc ' c 


OX3777 


000001 


1275 




M)1401 
s^x^wx 




1274 








1275 








1376 




1 A4<V>9 
Xw^W/C 




1377 








1378 








1279 








1260 








1281 








1282 








138 S 

AC V*^ 




UXc ' O ' 


002312 

WC W AC 


1284 








128S 




ft«ka777 


000001 


1286 








1287 

ACW ■ 








1266 




ft0777 


000001 


1289 




^VX^VX 




1290 

AC 








1291 








1292 




1 nA<v>v 

XV*W/d 




1295 








1394 

AC ' ' 


n03XX9 






1295 








1296 








1297 








1296 


<M^YY3 






1299 


003S13 


013767 
vxc > o • 


002540 


ISOO 








ISOI 


002540 






1302 


002S40 


042777 


000001 


1303 








1304 


002346 






1505 


002346 


032777 


000001 
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T2 BREAK • TCSRO SET. CLEAR. REaET 



SEQ 32 



176722 
176754 



176746 
176676 

176616 
176764 



176576 
176744 

176736 



176550 
176716 
176710 



I •TEST 2 

I* NOTE: 

fsT2: SCOPE 



BREAK - TCSRO SET. aEAR. RESET 
THE (H) JUr^R MUST BE REMOVED FOR THIS 
TEST TO FUNCTION PROPERLY. 



13: 



$4: 



♦ 5: 



NOV 

nov 



BIT 
BNE 

nov 

BR 



nov 



BIT 
BEQ 



ERROR 



nov 

BIS 



BIT 
BNE 



ERROR 



nov 

BIG 
BIT 



•lO.tTinES 
•2.ITESTN 



«BRK.tUSUR 
13 

«l.lTinES 
TST3 



iiOO 10 ITERATIONS 

1 1 SET TEST NUr«ER IN APT NAIL BOX 

IF «BRK NOTSETIN tUSUR THEN 

EXIT TST 

smEXIT this TEST 
ENDIF 



I SEE IF IT IS CLEAR 

BGNSUB 

•64I.ILPERR 



«8REAK.8TCSR 
»4 



ir 



«BREAK SETIN BTCSR THEN 



I BREAK 010 NOT RESET IN TCSR 
ERRHRO 2..0IDN0T 



«64».ILPERR 
•BREAK. 8TCSR 



«8REAK. BTCSR 
15 



ENDIF 
E»OSUB 

I TRY TO SET BREAK BIT 
BGNSUB 



LET aTCSR :- STCSR SET. BY fBREAK 

t STUCK TO 0 
IF «BREAK NOTSETIN mTCSR THEN 



t BREAK DID NOT SET IN TCSR 
ERR»«D 3..DIDN0T 



ENDIF 

EM>SUB 

I TRY TO CLEAR A SET BIT 
BGNSUB 

•64I.ILPERR 



•BREAK. 8TCSR 
•BREAK. BTCSR 



LET 
IF 



9TCSR :- STCSR CLR.BY CBREAK 



I SHOULD HAVE CLEARED 

•BREAK SETIN 8TCSR THEN 



H3 



NAINOEC-ZZ CVOVA-0 



uvuvnu , 


D1 1 




1 VJO 


\M#c9?* 


















002SS6 


104004 














1X17 
1 91c 






1 XI S 






1914 






1 XIS 


OOP 360 




1 X1#> 


OOP 560 


01P767 


1X17 

J 91 ' 






1 XI A 

1 910 


OA9V«6 




1 XI Q 

191 » 




052777 


1 X90 
1 9<V 






i 9C1 


OOPS 74 




1 VP 


OOPS 74 


ooooos 










009S76 


OS2777 




002404 


001401 










009406 






002406 


104005 


X<^C ' 


xw 






OOP410 




1551 


002410 




1S52 


002410 




1S3S 






1554 






1555 







NACYll 50A(10S2) 12'JUL-64 
05:04 T2 



•6: 



002566 176522 



000001 176670 



000001 176660 



•7: 



it* 



BEQ 
ERROR 



09:52 PAGE 55 

TCSRO SET. CLEAR. RESET 

t6 



NOV 



BIS 



RESET 

BIT 
BEQ 



ERROR 



SEQ 53 



s BREAK 010 NOT CLEAR IN TCSR 
ERRHRO 4..0IDN0T 



ENOIF 
ENOSUB 

t NOU SEE IF RESET CLEARS IT 
BGNSUB 



•64t.tLPERR 
46REAK.8TCSR 



«6RCM(.8TCSR 
•7 



LET 



aTCSR :- 4TCSR SET. By «eREAK 



I ISSUE BUS RESET 
BRESET 

IF fSREAK SETIN 8TCSR THEN 



I BREAK DID NOT RESET IN TCSR 
ERR»«0 5..0IDN0T 



ENDIF 



ENDSUB 
CNDTST 



13 



MAINOEC -ZZ CVDVA D 





.Pll 12-JU.-84 








1 %X7 






1 






1 XXO 


002410 


000004 


1 \Af\ 


002412 


012767 


1 

1 1 


002420 


012767 


1 1 
1 J*c 






1 VAX 








002426 




1 VA^ 


002426 


012767 


1 VAA 






1 X4 7 

I3n f 


002454 






002454 


052777 




002442 


001401 










002444 






002444 


104006 




002446 






002446 




A J J J 


002446 
















1 ISA 


002446 




^ 7 


002446 


012767 




0024S4 






002454 


052777 










002462 




X 


002462 


052777 


IKS 


002470 


001001 


X n^^^ 






1S67 


002472 




X 


002472 


104007 


X 


002474 




X J * V 


002474 




iS71 

X <9 « X 


002474 




X J * «- 






1S73 






1S74 

X ^ • ^ 


002474 




1S75 


002474 


012767 


lS7fc 

X V • V 






1S77 

X ^ ' • 


002502 




1378 


002502 


<M2777 


1379 






ISAO 


002510 




ISAI 


002510 


052777 


13A? 


002510 


001401 


1563 






13M 


002520 




1365 


002520 


104010 


13A6 


002522 




1387 


002522 




1388 


002522 




1589 






1390 






J591 


002522 





MACril 50A(1052) 12 JUL 84 0<» 
05:04 T5 NAINT 



52 PAGE 56 

- TCSR2 SET. CLEM. RESET 



SEQ 54 



1 1******* 

ICIEST 5 



nAINT - TCSR2 SET. CLEM. RESET 



176540 
176552 



176454 

176622 



TST5: SCOPE 
NOV 
NOV 



NOV 



110: 



176454 

176602 

176574 



111: 



176406 
176554 
176546 



<12: 



BIT 
BEQ 



ERROR 



NOV 
BIS 



BIT 
BNE 



ERROR 



NOV 
BIC 



BIT 
BEQ 



•lO.ITIMES tiDO 10 ITERATIONS 

•5.ITESTN iiSET TEST NUTSER IN MT NAIL BOX 

t SEE IF IT IS CLEM 

BGNSUB 

•64t,ILPERR 



4NAINT.STCSR 
tlO 



IF «NAINT SETIN 8TCSR THEN 



i NAINT 010 NOT RESET IN TCSR 
ERRHRD 6. .OIDNOT 



464I.ILPERR 
•NAINT. STCSR 



«NAINT.0TCSR 
111 



ENDIF 
ENDSUB 

I TRY TO SET NAINT BIT 
BGNSUB 



LET STCSR :> 8TCSR SET. BY tNAINT 

; STUCK TO 0 
IF «NAINT NOTSETIN STCSR THEN 



J NAINT DID r«T SET IN TCSR 
ERRHRO 7..0I0N0T 



ENDIF 

ENOSUe 

i TRY TO CLEM A SET BIT 
BGNSUB 



•64I.ILPERR 
•NAINT. STCSR 



•NAINT. STCSR 
112 



ERROR 10 



LET STCSR :- STCSR CLR.BY •NAINT 

I SHOULD HAVE CLEARED 
IF •NAINT SETIN STCSR THEN 



I NAIN' Dir NOT CLEM INTCSR 
ERRHRO 10..UIDN0T 



ENDIF 
ENDSUB 

i NOW SEE IF RESET CLEARS IT 
BGNSUB 



J3 



HAINOEC-ZZ-CVOVA-O HACril 30A(I052} 12-JUL-84 

CVOVAO.Pll lP-JUL-84 05:04 T3 



052777 000004 176526 



000004 176516 



1392 002522 012767 0025S0 176560 
1393 

1394 002530 

1395 002530 
1396 

1397 002536 

1396 002536 

1399 002540 

1400 002540 

1401 002546 
1402 

1403 002550 

1404 002550 

1405 002552 

1406 002552 

1407 002552 
1406 002552 
1409 
1410 
1411 
1412 



000005 

032777 
001401 



104011 



113: 



MAINT 
MOV 

BIS 

RESET 

BIT 
BEQ 



09:52 PAGE 37 

TCSR2 SET. CLEAR, RESET 



•64I.ILPERR 

«nAINT.8TCSR 



•MAINT. STCSR 
«1S 



ERROR 11 



LET 



SCO 35 



8TCSR :■ 8TCSR SET. BY tMAINT 
ISSUE BUS RESET 



BRESET 

IF 4MAINT SET IN STCSR THEN 



J MAINT DID NOT RESET IN TCSR 
ERRHRO 11..0I0N0T 



ENOIF 



ENOSUB 
ENOTST 



if 



l<3 



MAINDCC-ZZ-CVOVA-O MACril 
CVOVAO.Pll 12-JUL-84 05:04 



SOA(1052) 12- JUL -84 09: 
T4 XMITIE 









1414 






1415 






l*lo 






1*1 ' 






1 AIA 




019767 












01 974A 


1 AO^ 


nA9^74 


01 974/^ 

vxc • 


1 AOO 




000009 








1 ASA 












1 AMI 










019767 

VXC 'Of 


1 ASA 








\A^CvXV 






oa9<^io 

\A^CwXV 


039777 


1 All 


009616 


001401 


x^ 






X^ 






1434 


009690 


104019 


143^ 






143& 


009699 




1437 

X^ J r 


009699 




143A 

X^ JO 






143Q 

X~ J~ 






1 A40 






1441 

X^^ X 




019767 


1 A49 






1443 




OS9777 


1444 
















039777 


1447 






144A 






144Q 










10401 3 








14 V 






1453 

X^ 






1454 






1455 






1456 






1457 

X^^ ' 


009650 


019767 

VAC ' O ' 


1458 






1459 


009656 




1460 


009656 


042777 


1461 






1462 


002664 




1463 


002664 


032777 


1464 


002672 


001401 


1465 






1466 


002674 




1467 


002674 


104014 


1468 


002676 





000010 
000004 

000340 
002602 



002610 
000100 



002630 
000100 



002656 
000100 
000100 



52 PAGE 38 

- TCSR6 SET. CLEAR. RESET 



SEQ 36 



176376 
176410 



176300 



176446 



176260 
176426 



000100 176420 



176232 
176400 
176372 



1 1****** 

.•TEST 4 

TST4: 



XHITIE - TCSR6 SET. CLEAR. RESET 



64$: 



$14: 



115; 



SCOPE 
flOV 
MOV 

nov 

MOV 
RTI 



nov 



BIT 
BEQ 



•lO.ITIMES 
#4.ITESTN 

•PR7.-(SP) 
#64$. -(SP) 



I SEE 
•6S«.«LPERR 



tiDO 10 ITERATIONS 

I (SET TEST NUreER IN APT HAIL BOX 

I USE PRIORITY OF 7 
I (PUT NEW PS ON STACK 
iiPUT NEU PC ON STACK 
mPOP NEU PC AND PS 



I«^ IT IS CLEAR 

BGNSUB 



•XMITIE. 8TCSR 
$14 



IF #XniTIE SET IN BTCSR THEN 



ERROR 12 

I TRY 

nov «64$.$LPERR 
BIS #XMITIE.8TCSR 



: xniTIE DID NOT RESET IN TCSR 
ERRHRO 12..DI0N0T 



ENOIF 

ENOSUB 

TO SET xniTIE BIT 
BGNSUB 



BIT •xniTIE.aTCSR 
BNE tl5 



ERROR 13 



J TRY 

nov •64$.$LPERR 
BIC •xniTIE.STCSR 



BIT •XMITIE. 8TCSR 
BEQ $16 



ERROR 14 



LET 8TCSR :- 8TCSR SET. BY ♦xniTIE 

; STUCK TO 0 
IF •XniTIE NOTSETIN 8TCSR THEN 



i xniT DID NOT RESET IN TCSR 
ERRHRO 13..DI0N0T 



ENDIF 

ENOSUB 

TO CLEAR A SET BIT 
BGNSUB 



LET 8TCSR :- 8TCSR ClR.BY ♦XNITIE 

i SHOULD HAVE CLEARED 
IF •XMITIE SETIN 8TCSR THEN 



i XMIT DID NOT CLEAR IN TCSR 
ERRHRO 14,.DI0N0T 



ENDIF 



MAINDEC-ZZ-CVOVA-O MACYll 50A(1052) 

CVOVAO.Pll 12-JUL-e4 05:04 





/^3^7^ 




1470 


/\/\^^7iL 

002o 'O 




1*71 






1* '2 






1«73 


/^/^OA7& 




I* f* 


/^3^7JL 
UO«fD 'O 


ftl 37&7 
Vic 'O ' 


1* 






l*7o 


/VI07AA 




I* 1 1 


UUc 'U* 


Iff 








1 A 70 

1« /9 


/V>37 1 5 






rtft57 1 3 




1 A A 1 

1401 


/Vk371 A 
UUc ' 1* 






/V>371 A 
UVC ' 1' 


ftX3777 
U3c ' ' ' 






















AA3794 


1 ^ 














1489 


002726 




1490 


002726 




1491 






1492 






1493 






1494 







T4 

$16 



l3 

12-JUL-d4 09:52 PAGE 59 

XMITIE - TCSR6 SET. CLEAR. RESET 



SEQ S7 



002704 176204 



000100 176352 



000100 176342 



117: 



nov 



BIS 



RESET 

BIT 
BEQ 



ENOSUe 

i NOU SEE IF RESET CLEARS IT 
BGNSUe 



•64$.)LPERR 
♦XMITIE.aTCSR 



#XHITIE.8TCSR 
$17 



ERROR 15 



LET 8TCSR :- STCSR SET. BY •xnjTIE 

; ISSUE BUS RESET 
BRESET 

IF #XMITIE SETIN 8TCSR THEN 



J XMIT DID NOT RESET IN TCSR 
ER»?HRO 15.,0I0N0T 



ENOIF 



ENOSUe 
ENOTST 



: i' 



h3 



MAIK)eC-ZZ CVDVA-0 



(. vuvnu 


D 1 f 
''11 


13 HI .114 


OS -04 


















t AQ7 
























1500 








1501 








1502 








1509 


OOc 'CT> 


<WW>A 




1504 


(WC ' 3U 


Ol 37#»7 
\^1C * D f 


\A/\AiXW 


1505 


UUc ' 30 


ni 37#i7 
Ulc r D f 




150o 


UUc '** 








WUc 


nX37ik7 
U3C 'D r 


V*\AAA^ 


ISOO 


W/C f 3c 


WWIUV* 




f <UM 

l9(rf 


WIc » 3* 








M37M 
IM/C r 3* 


Ulc ' D r 


OOOOOl 


151X 


nA374^ 
WIc 'DC 


UUV**1 




151c 


AA37AA 
Wc »0* 






1 <1 V 

1319 


»0* 






131* 








1313 


<A/c »0* 






131D 


(Wc 'O* 


ftl 37l»7 
UlC >D ' 


\A/c ' ' C 


1 K1 7 

131 ' 


/V^3773 






1 JlO 


ftrt3773 
SAJc r r C 


043777 

\^c » » » 


\^A/WC 


1317 








13cV 








iJCl 


<V)X/W) 


ftX3777 

V JC ' * f 


000007 




IA^3^ATO 


\A/1*V1 




13c J 








13c* 


<v)XAt n 






I3c3 


IW3V1U 


iw*uio 




t ^3ik 
13cO 








13c f 


(W3V1C 






13CB 


(W3U1C 






13c^ 








133U 








1331 


<V)XA1 3 






133c 


<VM/M 3 


ftl 37i^7 
Vic rO ' 


UV3VCV 


1333 








13 J* 


<V)XA3n 
IA^3UCV 






1333 


<VtXA30 


0^777 
v3c f f 1 


lAA^AJC 


1330 


nnxA3<k 






1 ^X7 

133 f 


W3UCD 


ftX3777 
W3c » r ' 


VA/UWC 


13^0 


^v3V3* 


^A/l^Vl 




1337 








1 








13*4 


W3V JO 


tOA017 
H^wl ■ 




IMP 
1?*C 








13*3 


MXAAA 
^A^3V*W 






13** 








U* J 
















1547 


003040 






1546 


00S040 


012767 


005046 


1549 


005046 






1550 


005046 


042777 


000002 



MACai 50A(1052) 12-JUL-64 
T5 OTR 



09:52 PAGE 40 

- RCSUl SET. CLEIW 



>fQ 58 



176222 
176234 

176246 



176176 



176116 
176260 

176252 



I •TEST 5 
;• 

;• 
i» 

J (••• 

TST5: 



t20: 



•21: 



176070 

176232 
176224 



•22: 



176042 
176204 



SCOPE 
MOV 
NOV 

BIT 



nov 

BR 



nov 

BIC 



BIT 
BEQ 



NOV 



BIS 

BIT 
BNE 



OTR RCSRl SET. CLEAR 
NOTE: RESET DOES NOT CLEAR THIS BIT 
HE CANNOT TEST FOR AN INITIAL CONOITION 
AS THIS BIT IS UMXFINEO u;>ON POUER UP AND 
INIT DOESN'T AFFECT IT. 
THE (-FO) JUMPER MUST BE IN FOR THIS TEST TO UORK. 



•lO.ITIMES 
♦5.<TESTN 

«FRFD.^USUR 
•20 

•l.l TIMES 
TST6 



» TRY 
^•.•LPERR 
•OTR.WCSR 



•OTR.WCSR 
•21 



ttOO 10 ITERATIONS 

:;SET TEST NUTQER IN APT MAIL BOX 

IF CFRFO NOTSETIN tUSUR THEN 



EXIT TST 

itiEXIT THIS TEST 
ENOIF 

TO CLEAR OTR BIT 
BGNSUB 



LET 



IF 



WCSR :- tftCSR CLR.BY «OTR 

; STUCK TO 0 

«OTR SETIN 0H:SR THEN 



ERROR 16 



: OTR DID NOT CLEAR IN RCSR 
ERRHRO 16..0I0N0T 



J TRY 
•64^.^LPERR 

«0TR.aRCSR 

•OTR.atCSR 
•?2 



ENOIF 
ENOSUB 

TO SET OTR 

BGNSUB 



LET tflCSR :- 0)CSR SET. BY COTR 
IF tOTR NOTSETIN 8RCSR THEN 



ERROR 17 

t TRY 

MOV •64».<LPERR 
BIC «OTR.0)CSR 



{ OTR 010 NOT SET IN RCSR 
ERRHRO 17..0I0N0T 



ENOIF 

ENOSUB 

TO CLEAR IT AGAIN 
BGNSUB 

LET 



BRCSR ■- iRCSR CLR.BY COTR 



N3 



riAirOEC-ZZ CVDVA-D MACYll 30/K1052) 12-JUL-6« 09:52 PAGE 41 

CVOVAO.Pll 12- JUL -M 05:04 T5 OTR - RCSRl SET. CLEAR 



SEQ 



1551 

1552 003054 

1553 003054 032777 000002 

1554 003062 001401 
1555 

1556 003064 

1557 003064 104020 
1556 003066 

1559 003066 

1560 003066 

1561 003066 
1562 

1563 
1564 
1565 



176176 



BIT 
BEO 



•DTR.aRCSR 

(23 



: SHOULD HAVE CLEARED IT 
IF fOTR SET IN SRCSR THEN 



ERROR 20 



t DTR DID NOT CLEAR IN RCSR 
ERRHRO 20..DI0N0T 



(23: 



ENOIF 



ENOSUB 
ENDTST 



B4 



NAI>€)€C-« CVOV* 0 MACtU 
CVOVOO.PII 12-JUL-S4 05:04 



50A(1052) 12- JUL S4 09:52 PAGE 42 
T6 REQSCND • RCSR2 



SCO 40 



1566 








1567 








1560 








1569 








15''0 


009066 






1571 


AAS/\7A 

009070 


Al 37iL 7 
OAC 'O ' 




1572 


0090 'b 


rtl 37JL7 
UAC 'D ' 




1573 








15'4 




ftX37<l7 
V^C ' O f 




ISO 


AAX1 1 3 


UvA*W 




13 '6 


UU3A A* 






• C T 7 

157 7 


UU3A A* 


UAc 'O ' 


AAA/V11 


15 7B 


^^X1 33 


JC 




t ^70 

ID 








150O 


^^X1 






1501 








1 KMO 








1 VilX 


w/aAc* 






1 KMA 


w^aAc^ 


At 374k7 
VAc 'O ' 


Mil IP 


1 Vil^ 








1 ^Md^ 


<MXl X3 






1 ^il7 


iWSA 3c 


013777 
V3C ' ' ' 


AAAMM 


1 ^MM 


WI3A*V 


A*wA 




1 miQ 








1 


M>X1 A3 






1 


M>X1 A? 
W/3 A*c 


A^^VC A 






AAX1 






1 ^QX 


AAX1 






1 


WI3A** 






















1 ^07 


AA 






1 ^<MI 


nnxyAA 
WI3A** 


At 37&7 
UAc 'O ' 


^W3A9c 


t ^QO 


nnxi ^3 
sW3a3c 








vV9A3c 


A^M777 


______ 

owwo* 










IDWc 


^W3AOU 






10U9 


^W3aOU 


AX3777 
w3c ' ' ' 






W/9ADO 


W/AW/A 




XOV3 










<V>X1 7A 






111/17 


<v>xi 7n 

W/3A 'V 


1 AAA33 
Af^Vcc 






MX1 79 
A ' C 






AWT 


MXl 73 








fMXI 73 
A ' C 






^fk^ 1 








Xw AC 










MX1 73 






111 1 A 

Aw A V 


J A ' C 


VAC ' w ' 




1615 








1616 


00S200 






1617 


00S200 


042777 


000004 


1616 








1619 


0OS2O6 






1620 


00S2O6 


0J2777 


000004 


1621 


00S214 


001401 





SET. CLEAR. RESET 



176062 
176074 

176106 
176036 



175756 
176120 



175736 
176100 

176072 



175710 
176052 
176044 



I !•••••••••••« 

••TEST 6 
I* 

TST6: SCOPE 

nov 

MOV 

BIT 
BNE 

nov 

BR 

124: 



•25: 



126: 



NOV 



BIT 
BEO 



NOV 
BIS 

BIT 



NOV 
BIC 



BIT 
BEQ 



RCQSEIC - RCSR2 SET. CLEAR. RESET 

THIS TEST ASSltCS THAT JUMPER (FR) IS IN 



•lO.fTirCS 
M.fTESTN 

•FRFD.fUSUR 
124 

•i.iTircs 

TST7 



llOO 10 ITERATIONS 

1 1 SET TEST NUraCR IN fPl MAIL BOX 

IF CFRFO NOTSETIN fUSUR THEN 



EXIT TST 



iliEXIT THIS TEST 
EWIF 



t SEE IF IT IS CLEAR 

BGNSUB 



•64I.«LPERR 



•REQSE»0.«CSR 

125 



IF 



ERROR 21 



«REQSE»0 SETIN BRCSR T^N 



I REQSEKO DID NOT RESET IN RCSR 
ERR»«0 21..DI0N0T 



ENOIF 

E^OSUB 

t TRY TO SET REQSE»0 BIT 
BGNSUB 



•64t.tLPERR 
«REQSE»O.0)CSR 



•REQSEKO.WCSR 
126 



LET SRCSR :• WCSR SET.Bv MEOSENO 

I STUCK TO 0 
IF MEQSEM) NOTSETIN VCSR T»€N 



ERROR 22 



I REQSE»0 DID NOT SET IN RCSR 
ERR»«D 22.. OIONOT 



E»CIF 
E»OSU8 



I TRY TO CLEAR A SET BIT 
BGNSUB 

•64I.ILPERR 



•REQSE^O.tftCSR 



•REQSEN0.8RCSR 

»27 



LET SRCSR :- SRCSR CLR.BY MEOSENO 

i SHOULD HAVE CLEARED 
IF •REQSENO SETIN SRCSR T»€N 



riAI^CCC ZZ CVOVA 0 MACtll SOA(IOS^) 1^ JUL 84 09:52 PAGE 45 

CVOVAO. PU 12 JU. 64 05:04 76 REOSEND - RCSR2 



SCO 41 



SET. CLEAR. RESET 



lt>22 








005216 




1624 


005216 


104025 


1625 


005220 




1626 


005220 




1627 


005220 




1628 






1629 






1650 


005220 




1651 


00S220 


012767 


1652 






1655 


0OS226 




1654 


00S226 


052777 


1655 






1656 


005254 




1657 


005254 


000005 


1656 


005256 




1659 


005256 


052777 


1640 


00S244 


001401 


1641 






1642 


005246 




1645 


005246 


104024 


1644 


005250 




1645 


005250 




1646 


005250 




1647 


005250 




1646 






1649 






1650 






1651 







ERROR 25 



I REQSCND 010 NOT CLEAR IN RCSR 
ERR»«D 25..0I0N0T 



•27: 



005226 175662 



000004 176024 



000004 176014 



NOV 



BIS 



RESET 

BIT 
BEQ 



•64t.lLPERR 
«RE0SEIO.8RCSR 



«RE0SE»O.aRCSR 
•SO 



E»OZF 
ENDSUB 

t NOU SEE IF RESET CLEARS IT 
BGNSUB 



LET WCSR :• WCSR SE^.B' iREOSEliO 

t ISSUE BUS RESET 
BRESET 

IF MEOSCM) SET IN WCSR T»€N 



ERROR 24 



I REQSEfO 010 NOT RESET IN RCSR 
ERR»«0 24..DI0N0T 



tSO: 



ElOIF 



E»OSUB 
EWTST 



1 1< 



riAlP«eC ZZ CvOvA O MACTll 
CVOVAO.Pll 12-JUL-e4 05:04 



S0A(1052) 12-JU.-S4 09:52 PAGE 44 
T7 SCCXniT - RCSH3 



16^ 

1655 

1654 

1655 

1656 

1657 

165a 

1659 

1660 

1661 

1662 

1665 

1664 

1665 

1666 

1667 

1666 

1669 

1670 

1671 

1672 

1675 

1674 

1675 

1676 

1677 

1678 

1679 

1660 

1661 

1662 

1665 

1664 

1665 

1666 

1667 

1666 

1669 

1690 

1691 

1692 

169S 

1694 

1695 

1696 

1697 

1696 

1699 

1700 

1701 

1702 

1705 

1704 

1705 

1706 

1707 



003250 
00S252 
00S2M 

009266 
00S266 

00S274 
00S274 
00SS02 

005504 
005504 
005306 
005306 
00SS06 



00S506 
00SS06 
00S514 
00S514 

003S22 
003S22 
003530 

003532 
003352 
005534 
005534 
003534 



003354 
003354 

003542 
003542 

005350 
005350 
003356 

005560 
003360 
003362 
003362 
003362 

003362 
005362 



000004 
012767 
012767 



012767 



032777 
001401 



104025 



012767 
052777 



032777 
001001 



104026 



012767 
042777 



052777 
001401 



104027 



000010 
000007 



00S274 

000010 



005514 
000010 



005542 

000010 
000010 



175700 
175712 



175614 

175756 



175574 
175736 



000010 175750 



175546 

175710 
175702 



012767 003570 175520 



I •TEST 7 
TST7: SCOPE 



SET. CLEAP. RESET 
SECXniT • RCSftS SET. CLEM. RESET 



SEQ 42 



151: 



t52: 



»55: 



NOV 
NOV 



NOV 



BIT 
BEO 



NOV 



•lO.tTINES tiOO 10 ITERATIONS 

•7.ITESTN 1 1 SET TEST NUTVER IN APT NAIL BOX 

I SEE IF IT IS CLEAR 

BGNSUB 

•64I.ILPEPR 



•SECXNIT. WCSR 
131 



IF #SECXNIT SET IN WCSR T»€N 



ERROR 25 



I SECXNIT DID NOT RESET IN RCSR 
ERRHRO 25,.DIDN0T 



NOV •64I,ILPERR 
BIS •SECXNIT.SRCSR 



BIT tSECXNIT.WCSR 
BNE 152 



EWIF 
ErOSUB 

I TRY TO SET SECXNIT BIT 
BGNSUB 



LET 



aRCSR :- OHTSR SET. BY tSECXNIT 



5 STUCK TO 0 
IF tSECXNIT NOTSETIN WCSR T»€N 



ERROR 26 



I SECXNIT DID NOT SET IN RCSR 
ERRHRO 26..0IDNOT 



NOV •64l.tLPERR 
BIC •SECXNIT.SRCSR 



BIT •SECXNIT. WCSR 
BEO 135 



E«IF 
EM)SUe 

I TRY TO CLEAR A SET BIT 
BGNSUB 



LET 



«K:SR :- WCSR CLR.BY •SECXNIT 



ERROR 27 



I SHOULD HAVE CLEARED 
IF •SECXNIT SETIN O^CSR THEN 



I SECXNIT DID NOT CLEAR IN RCSR 
ERRHRO 27..0IONOT 



ENDIF 
ENOSUB 
BGNSUB 

•64 I ILPERR 

I NOW SEE IF RESET CLEARS IT 



E4 



nAIMXC -ZZ -CVOVA 0 



MACni 30A(1052) 12 JUL M 09:52 PAGE 45 



CVOVAO.Pll 



12JU.-S4 05:04 



T7 



1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1716 
1719 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 



003370 
003370 

003376 
003376 
003400 
003400 
003406 

009410 
003410 
005412 
005412 
005412 
005412 



052777 000010 175662 



000005 

032777 
001401 



104050 



000010 175652 



134: 



SECXniT - RCSR3 



BIS 



RESET 

BIT 
BED 



•SECxniT.WCSR 



•SECXHIT.WCSR 
»54 



ERROR 30 



SET. CLEAR. RESET 



LET 



SEO 43 

8RCSR 8RCSR SET. BY •SECXMIT 
ISSUE BUS RESET 



BRESET 

IF •SECXMIT SETIN 8RCSR THEN 



i SECXMIT DIO NOT RESET IN RCSR 
ERRMRO 30..0IONOT 



ENOIF 



ENOSUB 
ENOTST 



It* 



F4 



MAINDCC-ZZ CVDVA-D MACTll 
CVOVAO.Pll 12-JU.-84 05:04 



50A(1052) 12-J(JL-a4 09 
TIO DATAIE 



52 PAGE 46 

- RCSftS SET. CLEAR. RESET 



SEO 44 



1728 








1729 








1750 








1751 


005412 


000004 




1752 


005414 


012767 


000010 


1755 


003422 


012767 


000010 


1754 








1755 


003450 






1756 


003450 


012767 


003436 


1757 








1756 


005456 






1759 


005456 


052777 


000040 


1740 


003444 


001401 




1741 








1742 


003446 






1745 


003446 


104031 




1744 


003450 






1745 


003450 






1746 


003450 






1747 








1748 








1749 


005450 






1750 


003450 


012767 


003456 


1751 


003456 






1752 


003456 


052777 


000040 


1755 








1754 


003464 






1755 


003464 


032777 


000040 


1756 


003472 


001001 




1757 








1756 


003474 






1759 


003474 


104032 




1760 


003476 






1761 


003476 






1762 


003476 






1765 








1764 








1765 


003476 






1766 


003476 


012767 


005504 


1767 








1766 


003504 






1769 


003504 


042777 


000040 


1770 








1771 


005512 






1772 


003512 


032777 


000040 


1773 


003520 


001401 




1774 








1775 


003522 






1776 


003522 


104033 




1777 


003524 






1778 


005524 






1779 


005524 






1760 








1781 








1782 


005524 






1785 


005524 


012767 


005532 



175536 
175550 



175452 
175614 



UtEST 10 

TSTIO: SCOPE 
NOV 

nov 



nov 



OATAIE - RCSRS SET. CLEAR. RESET 



♦ 35: 



175432 
175574 

175566 



>36: 



175404 
175546 
175540 



137: 



BIT 
BEQ 



nov 

BIS 



BIT 
BNE 



nov 



BIC 



BIT 
BEQ 



♦lO.ITIMES 
•lO.tTESTN 

I SEE 

«64I.ILPERR 



•OATAIE.tftCSR 
1 35 



iiDO 10 ITERATIONS 
It SET TEST NUMBER IN APT HAIL BOX 
IF IT IS CLEAR 

BGNSUB 



IF fOATAIE SET IN SRCSR THEN 



ERROR 31 



i OATAIE 010 NOT RESET IN RCSR 
ERRHRD 31,.DIDN0T 



J TRY 
•64I,ILPERR 
•OATAIE. WCSR 



•OATAIE.aRCSR 
136 



ENDIF 
ENOSUB 

TO SET OATAIE BIT 
BGNSUB 



LET aRCSR :« anCSR SET. BY «OATAIE 

» STUCK TO 0 
IF 40ATAIE NOTSETIN SRCSR THEN 



ERROR 32 



s OATAIE DID NOT SET IN RCSR 
ERRHRD 52..0IDN0T 



J TRY 
«64I.$LPERR 

•OATAIE. WCSR 



•OATAIE.WCSR 
137 



ENOSUB 

TO CLEAR A SET BIT 
BGNSUB 



ERROR 33 



LlT SRCSR :- 8RCSR CLR.BY •OATAIE 

t SHOULD HAVE CLEARED 
IF «OATAIE SETIN SRCSR THEN 



i OATAIE DID NOT CLEAR IN RCSR 
ERRHRD 33..DI0N0T 



175556 



nov 



t NOU 
•64».tLPERR 



EWIF 

EKOSUB 

SEE IF RESET CLEARS IT 
BGNSUB 



G4 

SEQ 45 

MAINOCC ZZ CVOVA-D hACYll 30A(1052) 12-JUL-64 09:52 PAGE 47 

CVOVAO.Pll 12-JUL-64 05:04 TIO OATAIE - ftCSR5 SET. ClEAR. RESET 

1784 

1765 0055S2 LET 0)CSR WCSR SET. By tOATAIF 

1766 003552 0S2777 000040 175520 BIS •OATAIE. SRCSR 

1767 I ISSUE BUS RESET 
1 766 005540 BRESET 

1769 005540 000005 RESET 

1790 005542 IF ^OATAIE SETIN WCSR T»€N 

1791 003542 032777 000040 175510 BIT •OATAIE.BPCSR 

1792 003550 001401 BEQ 140 

1795 i OATAIE DID NOT RESET IN RCSR 

1794 003552 ERRHRO 34,.DI0N0T 

1795 003552 104054 ERROR 34 

1796 003554 ENOIF 

1797 003554 140: 

I79e 003554 ENOSUB 

1799 005554 ENOTST 

1600 

1801 

1802 

1805 II •••••*••••••••••••••••••••••••••••••*••*•••••••••••••••••••••*• 



H4 



riAIM)CC-ZZ CVOVA 0 MACril 
CVOVAO.Pll 12-JUL-S4 05:04 



3OA(10S2) 12- JUL -64 09. 

Til RCVRIE 



52 PAGE 46 

• RCSR6 SET. CLEAR. RESET 



SFQ 46 









% SAC 






IBOd 






lOQ ' 




%AAAA^ 


1006 




UXc 'O r 


1 AAA 


00330* 


wXC 'O ' 








1011 






IBl^ 


/V1V^73 


UXc 'D ' 


1013 






101* 


sow/ 




1 A1 ^ 

1913 


lA^ JO^A/ 


01P777 

V Jc r f f 


lOlo 




IA/X^\IX 


1*17 

lOl ' 






1 Ml Jl 

lOlO 






1 A1 Q 

le It 


\A/00 X w 


1 AAAX^ 

XV*vJ3 


1 HOCt 
lOcv 


(A^OOXC 




1 A31 
lac 1 


jO Xc 






\A/ JOXC 


















\A/JOXc 






\A/^VXC 


vXC 'V > 


1 HP? 






iOcO 


JOCV 


OSP777 


1 H>9 








jOcO 




1 AX1 


\A/ JOcO 


01P777 

V Jc r f r 




WUOO 


AA1 AA1 
















JO jO 


1 AAA^ 


1 A% 


jo*v/ 




1 

lO J r 


^AIjO^U 






\A/JO*l/ 










1 AAA 






1 AA1 
XO^X 


\WJO*U 




XO^« 


<V)VAAA 
\A/ JO^v 


A1 37#k7 

VXC 'O ' 


1 A4'% 

XQ^ J 






1 AAA 


JO^O 




1 AAS 

XQ^ J 




AA9777 

fit 


lAAft 

Xl^'W 






X^^ ' 






IMA 




05P777 


1644 




001401 








16S1 


001664 






00S664 


1040S7 


1853 


003666 




1654 


00S666 




1655 


003666 




1856 






1657 






1656 


003666 




1659 


003666 


012767 



175374 
175406 



175310 
175452 



I •TEST 11 

TSTll: SCOPE 
NOV 
NOV 



nov 



RCVRIE - RCSR6 SET. CLEAR. RESET 



•41: 



175270 
175432 

175424 



142: 



175242 
175404 

175376 



•43: 



BIT 
BEO 



•10. (TIMES 
•ll.^TESTN 

I SEE 

•64«.^LPERR 



«RCVRIE.aRCSR 
•41 



iiDG 10 ITERATIONS 
1 1 SET TEST NUNBER IN APT NAIL BOX 
IF IT IS CLEAR 

BGNSUB 



IF fRCVRIE SETIN «CSR THEN 



ERROR 35 

X TRY 

NOV •64^.^LPERR 
BIS fRCVRIE.BRCSR 



BIT •RCVRIE.flRCSR 
BNE ^42 



: RCVRIE 010 NOT RESET IN RCSR 
ERRfOO 35..0I0N0T 



ENOIF 

ENOSUB 

TO SET RCVRIE BIT 
BGNSUB 



LET SRCSR :- WCSR SET. BY 4RCVRIE 

I STUCK TO 0 
IF MCVRIE NOTSETIN aRCSR THF.N 



ERROR 36 



J TRY 

NOV •64^.^LPERR 
BIC 4RCVRIE. SRCSR 



BIT 4RCVRIE.8RCSR 
BEO ^43 



ERROR 37 



: RCVRIE 010 NOT SET IN RCSR 
ERRHRD 36..0IDN0T 



ENOIF 

ENDSUB 

TO CLEAR A SET BIT 
BGNSUB 



LET SRCSR :- SRCSR CLR.BY #RCVRIE 

J SHOULD HAVE CLLAREO 
IF «RCVRIE SETIN SRCSR THEN 



t RCVRIE DID NOT CLEAR IN RCSR 
ERRHRO 37..0I0N0T 



175214 



MOV 



i NOW 
*64^.^LPERR 



ENOIF 

ENOSUB 

SEE IF RESET CLEARS IT 
BGNSUB 



IIAINDEC -ZZ- CVOVA-0 PIACril 50A(10S2) 12- JUL 

CV0V*0.P11 12-JUL-84 05:04 Til 



-84 09:52 PAGE 49 
RCVRIE - RCSR6 SET. CLEM). RESET 



1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1875 
1874 
187«) 
1876 
1877 
1878 
1879 
1880 
1881 
1882 
1883 
1884 
1885 
1886 



005674 

003674 052777 000100 175556 
005702 

005702 000005 
005704 

005704 052777 000100 175546 
005712 001401 

005714 

005714 104040 

005716 

005716 

005716 

005716 

005716 



BIS 



RESET 

SIT 
BEQ 



•RCVRIE. 8RCSR 



•RCVRIE. 8RCSR 
144 



LET 



S£Q 47 



8RCSR :- 8RCSR SET.Bv «RCVRIE 



ERROR 40 



i ISSUE BUS RESET 
BRESET 

IF «fiCVRIE SETIN 8RCSR TICN 



t RCVRIE 010 NOT RESET IN RCSR 
ERfMRD 40..0IONOT 



U4: 



ENDIF 

CKLOOP 
ENOSUB 
ENDTST 



I* T»C FOLLOUING 4 TESTS VERIFY 
;* THAT RESET (INIT) INITIM.IZES REM) ONLY BITS. 



i t< 



- IS CLEARED BY INIT 



SCO 46 



1867 

leas 

1869 

1890 
1091 
1892 
1895 
1694 
1695 
1896 
1697 
1698 
1899 
1900 
1901 
1902 
1905 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1911 
1912 
1915 
1914 
1915 
1916 
1917 
1918 
1919 



005716 000004 

005720 012767 000010 175232 
005726 012767 000012 175244 



005754 

005754 012767 005742 175146 
005742 

005742 032777 000200 175310 
005750 001402 



003752 

003752 104041 
005754 

005754 000005 

005756 

005756 

005756 
005756 
003756 



••TEST 12 

TST12: SCOPE 
NOV 
NOV 



TEST THAT RCVROONE - RCSR 7 - IS CLEARED BY INIT 



NOV 

BIT 
BEQ 



#l0.tTINES 
#12.ITESTN 



iiDO 10 ITERATIONS 

It SET TEST NUMBER IN APT NAIL BOX 



•64I.ILPERR 

•RCVRDONE.SRCSR 
$45 



BGNSUB 
IF 



4RCVRD0NE SETIN SRCSR THEN 



ERROR 41 
RESET 



$45: 



(RCVROONE SHOULD HAVE CLEARED BY INIT 
: RCVROONE DID NOT CLEAR IN RCSR 
ERRHRO 41.HRESET. OIONOT 

iREISSLC RESET 
BRESET 

ENDIF 

:ALLOU LOOPING AFTER ERROR 
CKLOOP 
ENDSU8 
ENDTST 



I<4 



rtAINDEC-Z7-CV0VA0 MACYll 30A(1052) 12-JU.-64 09:52 PAGE 51 

CVOVAO.Pll 12-JUL-fl4 05:04 T15 TEST THAT XMITROY - TCSR 7 



SEQ 49 



IS SET BY INIT 



1920 






1921 






1922 






1925 


005756 


c<xxx># 


1924 


005760 


012767 


192S 


005766 


012767 


1926 






1927 






192S 






1929 






1950 


005774 




1951 


0O5774 


A1 97^7 


1952 






1955 


OO40O2 






004002 


032777 


1953 


004010 


AA^ 


1936 






1957 






« ASA 






1959 


AAAA4 9 




19«0 


004012 




1 <1A 1 












19#5 


00401* 


AAAAAC 


1 AM M 

1944 


004010 






0U4Ul0 










1947 


004016 




1948 


004016 




1949 


004016 




1950 






1951 






1952 







000010 
00001 s 



175172 
175204 



!^TEST 15 
TST15: SCOPE 

nov 
nov 



nov 



TEST THAT XMITROY - TCSR 7 - IS SET BY IHIT 



BIT 
9NE 



#10.»TIMES 
•15. «TESTN 



«64I.ILPERR 



•xniTROY.BTCSR 
•46 



1(00 10 ITERATIONS 

tiSET TEST NUMBER IN APT NAIL BOX 



6GNSUB 



IF 



•XHI7R0Y NOTSETIN 8TCSR THEN 



ERROR 42 



RESET 



$46: 



(RESET SHOULD HAVE SET BIT. 

iXNITRDY 010 NOT SET IN TCSR (AFTLR RESE 

ERRHRO 42.HRESET.0I0NOT 

(ISSUE ANOTHER RESET 
BRESET 

EWIF 

(ALLOW LOOPING ON ERROR 
CKLOOP 
EM)SU6 
ENDTST 



L4 



riAIK)€C-ZZ-CVOVA-D flACYll 50*(1052) 12-JUL-M 09:52 PAGE 52 

CVOV*0. PU 12-JUL-S4 05:04 T14 TEST THAT OATAINT 



SCO 50 



1955 






1954 






1955 






1956 


004016 


000004 


1957 


004020 


012767 


195« 


004026 


012767 


1959 






1960 






1961 






1962 






1965 


004054 




1964 


004054 


012767 


1965 


0O4042 




1966 


004042 


052777 


1967 


004050 


001402 


t96« 






1969 


004052 




1970 


004052 


104045 


1971 






1072 






1975 






1974 






1975 






1976 


004054 




1977 


004054 


000005 


1978 


004056 




1979 


004056 




1960 


004056 




1961 


004056 




1962 


00«056 




1065 






1904 






1965 






1966 







000010 
000014 



004042 

100000 



175152 
175144 



175046 
175210 



J •TEST 14 
TST14: SCOPE 

nov 
nov 



MOV 



RCSR 15 - IS CLEMEO BY INIT. 
TEST THAT DATAINT - RCS« 15 - IS CLEAHEO BY INIT. 



BIT 
BEQ 



•lO.ITIfCS 
•14.$TESTN 



#641 . ILPERR 

«OATAINT.0)CSR 
t47 



t I 00 10 ITERATIONS 

1 1 SET TEST NUrCER IN APT HAIL BOX 



BGNSUB 
IF 



ERROR 45 



RESET 



•OATAINT SETIN SRCSP THEN 



ERR»«0 45. HRESET. OIDNOT 



;TESTING EFFECT OF RESET ON BIT 

i DATAINT DID NOT CLEAR IN RCSR 

iALLOU A FRESH START 

BRESET 



•47: 



EM)IF 

CKLOOP 
ENDSUB 
ENDTST 



M4 



rWINOCC ?7-CV0VA 0 riACYU 
CVOV<»O.Pll 12-M -64 05:04 



50A(1052) 12- JUL -64 09:52 PAGE 55 

TIS TEST THAT RCVRACT • RCSR 11 



SEQ 51 



1 OA7 






1 una 






19BV 
















01P7I17 






01P7A7 

VAC 'V ' 






















00*074 


0SP767 
























/AC ■ w ' 




0041 1 9 






0041 14 






004114 
























0041 14 




POM 


004114 


012767 

W AK • W ■ 


POM 






POlO 


00412P 




pot 1 


0O41P? 


OiP777 


AC 




00140P 

W A^WC 


CV A ^ 






P014 






P015 


00415P 










POl 7 






901A 












?o?o 












CVcs 
















OOMOS 


2025 


004156 




2026 


004156 




2027 






2026 


004156 




2029 


004156 




2050 


004156 




2051 







I^TEST 15 



TEST THAT RCVRACT 



- 15 CLEARED BY INIT 

RCSR 11 - 15 CLEARED BY INIT 



000010 
000015 



175072 
175104 



020000 175116 



000001 175046 



TST15: SCOPE 
NOV 

nov 



BIT 
BNE 



nov 

BR 



<S0: 



004122 
004000 



174766 
175150 



nov 



BIT 
BEQ 



RESET 



♦51: 



•lO.tTIMES 
#15,$TESTN 



KABLE.IUSUR 
150 



•1.$ TIMES 
TST16 



mOO 10 ITERATIONS 

tiSET TEST NUMBER IN APT MAIL BOX 



IF KABLE NOTSETIN lUSUR T»€N 



: CAN'T TEST WITHOUT 3ERG OR H315. 
EXIT TST 



«64I.ILPERR 



«RCVRACT.aRCSR 

151 



;i(EXIT THIS TEST 
ENDIF 



BGNSU6 
IF 



iRCVRACT SETIN WCSR T»€N 



ERROR 44 



:ReSET SHOULD HAVE CLEARED RCVRACT 
ERRHRO 44. HRESET. OIDNOT 



; TESTING EFFECT OF RESET ON BIT 

sRCVRACT DID NOT CLEAR IN RCSR 

;ALL0U ANOTHER TRY 
BRESET 

ENDIF 

I ALLOW LOOPING ON ERROR 
CKLOOP 
ENDSUB 
ENDTST 



N4 



nAirCCC-ZZ-CVOVA-O 



CVOVAO 


pr 


12-JUL-04 


2052 






2055 






2034 






2055 






20 36 






2037 






2036 






2059 






2040 






2041 






2042 






2045 






2044 






2045 


004136 


000004 


2046 


004140 


012767 


2047 


004146 


012767 


2046 






2049 


004154 




2050 


004154 


032767 


2051 


004162 


001004 


2052 






2053 






2054 






2055 


004164 




2056 


004164 


012767 


2057 


004172 


000441 


2056 


004174 




2059 


004174 




2060 






2061 






2062 






2063 






2064 






2065 






2066 






2067 


004174 




2066 


004174 


012767 


2069 






2070 






2071 


004202 




2072 


004202 


042777 


2073 






2074 


004210 




2075 


004210 


032777 


2076 


004216 


001401 


2077 






2078 


004220 




2079 


004220 


104045 


2060 






2061 






2062 


004222 




2063 


004222 




2064 


004222 




2065 






2066 






2067 


004222 





MACYll 30A(1052) 12-JIX-64 09:52 PAGE 54 

05:04 T15 TEST THAT RCVRACT - RCSR 11 



SEQ 52 



15 CLEAMEO BY INIT 



I* T»C FOLLOUING 4 TESTS VERIFY 
t* THAT THE EIA SIGNALS CAN BE TRANSMITTED 
I* AND RECEIVED THROUGH THE CABLE 



000010 
000016 



175012 
175024 



n***** 
I •TEST 
t* 
I* 

I »••••< 

TST16: 



16 



SCOPE 

NOV 

NOV 



TEST THAT CAROET SETS AND CLEARS 
AS DTR SETS AND CLEARS 
THE (-F0) JUNPER MUST BE IN FOR THIS TEST. 



«10.ITIHES iiDO 10 ITERATIONS 

•16.ITESTN It SET TEST NUNBER IN APT NAIL BOX 

CAN UE USE T»C URAPAROUNO?? 



060000 175036 



000001 174766 



BIT 



•CABLE •FRFD.tUSUR 
«S2 



IF 



NOV 
BR 



•I.ITINES 

TST17 



«52: 



EXIT TST 

ctEXIT THIS TEST 
ENDIF 



«CABLE*FRFD NOTSETIN lUSUR THEN 



I CAN'T TEST UITHQUT BERG OR H315 
, OR WITH (-FO) JUr«>ER OUT. 
i OR UITH (.FR) JUMPER OUT. 



: aEAR 



004202 174706 



000002 175050 



010000 175042 



NOV 



BIC 



BIT 
BEQ 



«64I.ILPERR 



•DTR.SRCSR 



«CARDET.8RCSR 
153 



BGNSUB 



: OTR AND 

i CAROET ARE CONNECTED 
BY THE H315 OR EQUIV. 



: CLEAR OTR 

LET WCSR :- WCSR CLR.BY tOTR 

: CAROET SHOULD FOLLOW 

IF KAROET SETIN RRCSR THEN 



ERROR 45 



: CAROET DID NOT 
ERRHRD 45.. FORCE 



$53: 



ENOIF 



CLEAR UITH DTR 



s SET 



ENDSU8 



BGNSUB 





Dl 1 
''11 


13. ■■ .HA 




nnA333 


A1 371^7 
Vic 'O • 
























A^3777 










WW«3© 








AX3777 








































\W*C3V 




aim 


AAA 3^/1 






^V^c3v 




31 






31 ML 








W**«3V 




31 All 


^V^C3V 


A1 37#»7 
Vic 'O ' 








31 m 












3113 


MM3^ 


^^c t f ' 


31 1 X 






31 \A 






31 f <l 




rt*3777 


31 ItfL 


MM373 


<M1 AA1 


3117 






31 1 Jl 






31 1 Q 




1 fXA47 


31 3ft 
C lev 






3131 






31 33 






31 OX 






31 >A 


AAA37iL 




31 3^ 






313& 












2128 






2129 







riACTll S0A(10S2) 12 JUL 64 09:52 PAGE 55 
05:04 T16 



•54 i 



ISS: 



TEST THAT CAROET SETS AND CLEARS 
HOV •64*.tLPEfW 

BIS •OTR.WCSR 



BIT KAROET.WCSR 
BNE 154 



ERROR 46 



NOV 



BIC 



BIT 
BEO 



I CLEAR 
•Mf.tLPERR 

•OTR.WCSR 



4CAR0E T « IRCSR 
ISS 



ERROR 47 



SEQ 53 



I SET OTR 

LET «CSR :- WCSR SET. Br fOTR 

I CANKT SNOULO FOLLOW 

IF KANKT NOTSETIN VtCSR THEN 



I CAROCT DID NOT SET 
ERR»«0 46.. FORCE 



ENDIF 
ENDSU8 

BGNSUB 



i WITH DTR 



t aEAR DTR 

LET ancsR :- atcsR clr.bt •otr 

t caroet should follow 

IF KARDET SETIN «)CSR THEN 



I CARDET DID NOT 
ERR»«>0 47. .FORCE 



I CLEAR WITH OTR 
ENDIF 



ENDSU8 
ENDTST 



nAIHOEC 12 CvOvA 
CVOVAO.PII 12 



JUL 04 05:04 



MACUl 504(1052) 12 



T16 



JU.-64 09:52 «>«GC 56 

TEST TM4T CMOET SETS AND CLEARS 



SEO V» 









2151 






2152 






2155 






2154 






2155 






2156 


004276 


^WW\A 
(WWU4 


2157 


00430C 


A 1 9 7A 7 
Qlc 'O ' 


2156 


004 >UO 


m 37iL7 
Wlc 'O ' 


2159 






2140 


^W\A VIA 

004514 




2141 


iW\A VIA 

004S14 


A S 9 7A 7 


2142 


#W\A S99 


^A4 ^AA 


2145 






2144 


#W\A V9A 

O04324 




2145 


V9A 


A1 97A7 
Ulc »o » 


214* 


/W\A<(9 

0043K 


MWMX1 
OWI441 


214 f 


/V\A V VA 






MM VVX 
W>*394 




^4 AA 






94 

2130 






94 ^4 






9 4 C9 






91 CV 






91 %A 












91 CA. 


iW\A VVA 




91 ^7 


iW\A WA 


A1 97A7 
Ulc 'O ' 


91 %M 






9 1 CO 






91 


iW\A VA9 

<W4342 




31 A1 


M\A VA9 

W4342 


AA9777 
042 III 


91 A.9 






91 


004550 




91 AX 


0O493C 


AS9777 

OS2777 




iWlASSA. 

0O493O 


iW\4 Ai\4 

001401 


94 ' ' 

2166 






clO ' 


^AA 




94XA 


<W43oO 










31 7ft 






91 71 

C\ 1 1 


^AASA9 

0O43O2 




91 73 


WP4J62 




31 7« 


MMVA3 




31 7X 






31 7^ 
cl O 






31 7 A 
cl 'O 


<W>A tiL3 




31 77 
cl ' • 


<VM VJ^3 

wmsoc 


At 37IL7 
Ulc 'O ' 


31 7A 

cl 'O 






31 7Q 

cl 'TF 






31MA 
ClOT^ 






31111 


Q04V70 


V7C » » f 


2182 






2165 


004576 




2164 


004576 


052777 


2185 


004404 


OOlOOl 



i*TEST 17 


TEST THAT aRSEfO SETS AM) 


CLEARS 


I* 


AS OTR SETS AM) aEARS 






( FO) JV^IPCR MUST BE IN rOR 


THIS TEST TO UORK 



174652 
174664 



174676 



174626 



TST17: 



SCOPE 

nov 

NOV 



BIT 



nov 



•56: 



174546 



174710 



174702 



MOV 



BIC 



BIT 
BEB 



•57: 



174520 



174662 



174654 



•10. •Tires 

•17.^TESTN 



1 1 DO 10 ITERATIONS 
llSET TEST NUrVER IN APT MAIL BOX 

I CAN UC USE T»€ URAPAAOM)?? 
V •CABLE'fRFO NOTSETIN %\Km T»€N 

•CABLE •FRFO.tUSyR 
•56 

I CAN' T TEST yiTHOUT BERG OR H5l5 
EXIT TST 

•1.1 Tires 

TST20 iiiEXIT THIS TEST 

ENDir 



t OTR AND 

I aRSEND ARE COMCCTED 



t BY T»C H315 OR EQUIV. 



I CLEAR 



•64(.^LPERR 



•OTR.BRCSR 



•aRSEIO.tflCSR 
•57 



BONSUB 



LET 



IF 



ERROR 50 



J CLEAR OTR 

«)CSR :- «)CSR aR.BY •OTR 

I CLRSEW) SHOULD FXLOU 

•CLRSEND SETIN SRCSR T^CN 



I CLRSF.OC DID NOT 
ERR»«0 50.. FORCE 



I CLEAR UITH DTR 
EWIF 



I SET 

NOV •64^.^LPERR 



BIS •OTR.BRCSR 



BIT KLRSEND.tftCSR 
BNE 160 



EWSUB 



BGNSUB 



, SET DTR 

LET 0H:SR :- 0K:SR SET. BY •OTR 

I CLRSEND SHOULD FOLLOU 

IF •aRSEND NOTSETIN 0K:SR THEN 



CVOVAO.Pll 



CVOVA 0 

1«? JU- 



84 



NACTll 50A(10S2) 12 
05:04 T17 



JUL 



84 09:52 
TEST TM*T 



PAGE 57 
CLRSENO SETS 



SF.0 55 



AM) CLEARS 



^186 

2187 

2188 

2169 

2190 

2191 

2192 

2193 

2? 94 

2195 

2196 

2197 

219S 

2199 

2200 

2201 

2202 

2205 

2204 

2205 

2206 

2207 

2206 

2209 

2210 

2211 

2212 

2213 

2214 

2215 

2216 

2217 

2218 



004406 

004406 104051 



004410 
004410 
004410 



ERROR 51 



(60: 



I CLRSE»C DID NOT SET 
ERRMRD 51.. FORCE 



I UITH OTR 



10 

004410 012767 004416 174472 



004416 

004416 042777 000002 174634 
004424 

004424 032777 020000 174626 
004432 001401 

0044M 

004434 104052 



004436 
004436 
004436 
004436 



MOV 



BIC 



BIT 
BEQ 



I CLEAR 
•64I.ILPERR 

•OTR.WCSR 



•aRSEND.WCSR 
161 



EHOSUB 



BGNSUB 



ERROR S£ 



t61i 



i CLEAR OTR 

LET mCSH :- 8RCSR CLR.Br tOTR 

I CLRSEM) SHOULD FXLOU 

IF tCLRSENO SETIN «CSR THEN 



I CLRSEtO 010 NOT 
ERRMtD 52,. FORCE 



i CLEAR UITH OTR 
ElOIF 



ENDSUO 
ENDTST 



E5 

SEQ 5* 

riAINOEC ZZ CVOVA D NACril S0A(10S2) 12-JUL-M 09:S2 PAGE 58 

CVOVAO.PU 12-JUL-04 05:04 T17 TEST T»MT aRSEND SETS MO CLEMS 

fill liTEST 20 TEST THAT RING SETS *iC*CLE<y»S 

2222 t* AS REQSEND SETS MO aEMS 

2225 I* THE (-FR) JUMPER HUST BE IN FOR THIS TEST. 

2225 0044 S6 000004 TST20: SCOPE 

2226 004440 012767 000010 174512 NOV •10.»TIHES iiOO 10 ITERATIONS 

2227 004446 012767 000020 174524 HOV •20.ITESTN t tSET TEST NU»«ER IN APT nAIL BOX 

2228 t CAN UE USE THE WRAPAROUND ?? 

2229 004454 IF KABLE*FRFD NOTSETIN «USIA THEN 
22S0 004454 052767 060000 174536 BIT KABLE *FRFO . lUSUR 

2231 004462 001004 BNE t62 

2232 i CAN'T TEST WITHOUT BERG OR H315 

2233 I OR WITH (-FR) JUHPER OUT. 

2234 004464 EXIT TST 

2235 004464 012767 000001 174466 NOV •l.«TIMES 

2236 004472 000441 BR TST21 iiiEXIT THIS TEST 

2237 004474 ENOIF 

2238 004474 162: 
2239 

2240 I REQSEW) MO 

2241 I RING ARE COMCCTED 
2242 

2243 I BY THE HS15 OR EOUIV. 

2244 

2245 I CLEAR 

2246 0044 74 BGNSUB 

2247 004474 012767 004502 174406 NOV •64I.ILPERR 

2246 

2249 I CLEAR REQSEND 

2250 004502 LET tfKTSR WCSR aR.BY 4RE0SEND 

2251 004502 042777 000004 174550 BIC MEQSEIO.MCSR 

2252 i RING SHOULD FOLLQU 

2255 004510 IF MING SETIN WCSR THEN 
2254 004510 032777 040000 174542 BIT «RING.WCSR 

22^5 004516 001401 BEQ 163 

2256 t RING DID NOT 

2257 004520 ERRMH) 53.. FORCE 

2258 004520 104053 ERROR 53 

2259 

2260 i CLEAR WITH REQSEND 

2261 004522 ENDIF 

2262 004522 163: 

2263 004522 ENDSU8 
2264 

2265 i SET 

2266 004522 BGNSUB 

2267 004522 012767 004530 174360 NOV •64I,ILPERR 
2268 

2269 I SET REQSEND 

2270 004530 LET 8RCSR :- WCSR SET.Bt •REQSEND 

2271 004530 052777 000004 174522 BIS iREQSEND.WCSR 

2272 t RING SHOULD FOLlOW 

2273 004536 IF MING NOTSETIN WCSR THEN 

2274 004536 032777 040000 174514 BIT MING.WCSR 



MAimC 12 CVOVA-O 
CVOVAO.Pll 



12-JUL-8< 05:04 



NACTll S0A(10S2} 12- JUL -84 
T20 



F5 

09:52 PAG€ 59 



SEO 57 



2^75 


004544 


001001 


2276 






2277 


004546 




2278 


004 S46 


104054 


2279 






2280 






2281 


004550 




2282 


004550 




2283 


004550 




2284 






2285 






2286 


004550 




2287 


004550 


012767 


2288 






2289 






2290 


004556 




2291 


004556 


042777 


2292 






?293 


004564 




2294 


004564 


032777 


2295 


004572 


001401 


2296 






2297 


004574 




2298 


004574 


104055 


2299 






2500 






2S01 


004576 




2302 


004576 




2303 


004576 




2304 


004576 




2305 






2306 






2307 






2308 







TEST THAT RING SETS AND CLEARS 
BNE 164 

ERROR 54 



I RING DID NOT SET 
ERRHRO 54., FORCE 



t64: 



004556 174332 



000004 174474 



040000 174466 



nov 



BIG 



BIT 
BEQ 



I CLEAR 
•64t.lLPERR 

•AEOSEND.tftCSR 



«RING.8RCSR 
•65 



ENOIF 
ENOSUB 

BGNSUB 



WITH REQSENO 



ERROR 55 



t CLEAR REQSENO 

LET WCSR :- WCSR ClR.BY «REQSE»0 

I RING SHOULD FOLIOU 

IF «RING SETIN WCSR THEN 



I RING DID NOT 
ERRHRO 55.. FORCE 



165: 



ENDIF 



CLEAR WITH REQSENO 



ENOSUe 
ENDTST 



G5 

SCO 56 

riAI«eC-ZZ-CVOVA.O HACni 50A(1052) 12-JUL-W 09:52 PAGE 60 

CVOVAO.Pll 12- JUL -W 05:04 T20 TEST THAT RING SETS AND CLEARS 

2S09 ''*************t*tttttn*it»t»nnt!n!t!!«titt!n*»it»»niiim 

Ism !*TEST 21 TEST THAT SECREC SETS AND CLEARS 

23X2 I* AS SECXMIT SETS AND CLEARS 

2315 » t*************************************************************** 

2514 004576 000004 TST21: bCOPE 

2515 004600 012767 OOCOlO 174352 MOV #10,ITirCS iiDO 10 ITERATIONS 

2516 004606 012767 000021 174364 HOV #21.ITESTN nSET TEST NUTfiER IN APT MAIL BOX 

, CAN UE USE THE URAPAKOUK)?? 
2516 004614 KABLE NOTSETIN lUSUR THEN 

2319 004614 032767 020000 174376 BIT KABLE.IUSUR 

2320 004622 001004 BNE 166 

2321 , CAN'T TEST WITHOUT BERG OR H315. 

2322 004624 _ EXIT TST 
2525 004624 012767 000001 174326 NOV •I.ITIMES 

2324 004632 000441 BR TST22 iiiEXIT THIS TEST 

2325 004634 ENOIF 

2326 004634 166: 

IHs t SECXHIT AND 

2329 > SECREC ARE CO»#CCT£0 

2330 

2351 : BY THE H315 OR EQUIV. 

2332 

2333 » CLEAR 

2334 004634 BGNSlS 
2555 004634 012767 004642 174246 NOV •64I.ILPERR 

2536 

2557 5 CLEAR SECXHIT 

2336 004642 mCSfk 8RCSR CLR.BY tSECXMIT 

2339 004642 042777 000010 174410 BIC •SECXniT.WCSR 

2340 > SECREC SHOULD FOLLOW 

2341 004650 IF #SECREC SETIN WCSR THEN 

2342 004650 032777 002000 174402 BIT •SECREC. WCSR 
2345 004656 001401 BEQ <67 

2344 I SECREC DID NOT 

2345 004660 ERRHRD 56.. FORCE 

2346 004660 104056 ERROR 56 
2347 

2348 I CLEAR WITH SECXHIT 

2549 004662 ENDIF 

2550 004662 *67: 

2551 004662 ENDSUB 

2552 

2555 I SET 

2554 004662 BGNSlA 

2555 004662 012767 004670 174220 NOV •64I.ILPERR 

2556 

2357 I SET SECXHIT 

2356 004670 LET WCSR :- flRCSR SET. BY #SECXMIT 

2359 004670 052777 000010 174362 BIS •SECXNIT.WCSR 

2360 « SECREC SHOULD FOLLOW 

2361 004676 I*" #SECREC NOTSETIN BRCSR THEN 

2362 004676 032777 002000 17«554 BIT #SECREC . WCSR 

2365 004704 OOlOOl BNE 170 r.rr. «T 

2564 I SECREC DID NOT SET 



H5 



hAINOEC -ZZ CVOVA 0 MACYll 50A(10S2) 12 JUL-84 09:52 PAGE 61 

CVOVAO.Pll 12- JUL -64 05:04 T21 TEST THAT SECREC SETS AND CLEARS 



2S65 


004706 














ERRHRO 57,. FORCE 


2366 


004706 


104057 








ERROR 


57 


2367 


















2368 
















i UITH SECXMIT 


2369 


004710 














ENOIF 


2570 


004710 








170: 








2571 


004710 














ENOSUB 


2572 


















2573 














1 CLEAR 




2374 


004710 














BGNSUB 


2375 


004710 


012767 


004716 


174172 




nov 


•64I.$LPERR 




2376 


















2377 
















i CLEAR SECXniT 


2376 


004716 














LET WCSR :■ WCSR CLR.Bv #SECXniT 


2579 


004716 


042777 


000010 


174554 




BIC 


•SECXMIT.flRCSR 


2560 
















t SECREC SH0U.0 FXLOU 


2561 


004724 














IF #SECREC SET IN SRCSR THEN 


2562 


004724 


052777 


002000 


174526 




BIT 


#SECREC.flRCSR 


2565 


004732 


001401 








BEQ 


•71 




2564 
















i SECREC DID NOT 


2565 


004754 














ERRHRO 60. .FORCE 


2566 


004754 


104060 








ERROR 


60 


2567 


















2566 
















t CLEAR UITH SECXHIT 


2569 


004756 














ENDIF 


2590 


004756 








I71i 








2591 


004756 














ENDSUB 


2592 


004736 














ENOTST 


2595 


















2594 


















2595 


















2596 



















-1- _^ 
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SEQ 60 



2S97 

2596 

2S99 

2400 

2401 

2402 

2405 

2404 

2405 

2406 

2407 

2406 

2409 

2410 

2411 

2412 

2415 

2414 

24 IS 

2416 

2417 

2418 

2419 

2420 

2421 

2422 

2425 

2424 

2425 

2426 

2427 

2426 

242S 

2450 

2451 

2452 

2453 

24S4 

2455 

2436 

2457 

2456 

2459 

2440 

2441 

2442 

2445 

2444 

2445 

2446 

2447 

2448 

2449 

2450 

2451 

2452 



004756 
004740 
004 746 

004754 
004754 
004762 



004764 
004764 
004772 
004774 
004774 



004774 

005000 
005004 
005006 



005006 
005006 

005014 
005014 

005022 
005022 
005024 
005050 
005054 

005056 
005056 

005042 
005042 
005050 

005052 
005052 
005054 
005054 

005054 



000004 

012767 
012767 



052767 
001004 



012767 
000465 



012746 
012746 
000002 



012767 
042777 



010546 
012745 
004767 

012605 



017705 



052777 
001401 



104061 



1 1< 
i i< 
t 
I 
I 
I 
i 

1 1 



TEST 22 



000010 
000022 



174212 
174224 



TST22: 



060000 174236 



000001 174166 



000540 
005006 



005014 
000002 



000001 
004716 



174216 
100000 



♦72: 



641: 



174074 
174236 



174210 



SCOPE 

nov 
nov 



BIT 
BNE 



nov 

BR 



NOV 
NOV 
RTI 



NOV 
BIC 



NOV 
NOV 
JSR 
NOV 



NOV 



BIT 
BEQ 



TEST THAT OATAINT CRCSR-15) SETS 
UHEN OTR CHANGES STATE 

AND THAT OATAINT IS CLEARED AFTER READING RCSR 

NOTE OTR IS TIED TO BOTH CAROET AND CLRSEND BY THE H515 

THE (-F0) JUNPER NUST BE IN FOR THIS TEST. 

•lO.ITINES iiOO 10 ITERATIONS 

•22. ITESTN iiSET TEST NUMBER IN APT MAIL BOX 

i CAN UE USE THE URAPAROONO?? 
IF «CABi.E*FRFD NOTSETIN tUSUR THEN 

KABLE^FRFO.IUSUR 
•72 

i CAN'T TEST UITHQUT BERG OR H515 
I OR UITH (-FD) JUNPER OUT. 
EXIT TST 

•I.ITIHES 

TST23 iiiEXIT THIS TEST 

EM)IF 

I MAKE SURE NOTHING UNEXPECTED HAPPENS 
•PR7.-(SP) i I PUT NEU PS ON STACK 

•641. -(SP) iiPUTNEUPCON STACK 

I iPOP NEU PC AND PS 



iREAO TUICE - aEARS 

BGNSUB 



•65I.»LPERR 
•OTR.WCSR 



R5.-CSP) 
•l.-(R5) 
PC. WAIT 
(SP)».RS 



WCSR.R5 



•OATAINT.MCSR 
•75 



ERROR 61 



I CLEAR DTR 
LET SRCSR :' SRCSR CLR.By tOTR 

I WAIT 1 HILLI-SEC FOR CABLE 
UAITHS 1 



i READ RCSR - TO CLEAR OATAINT 
LET R5 :- SRCSR 

I READ RCSR AGAIN 
IF •OATAINT SETIN SRCSR THEN 



i READING RCSR DID NOT CLEAR OATAINT 
ERRHRD 61.EDATAINT 



• 75: 



ENDIF 



ENDSUB 



haindcc-zz-cvova-d hacyii 

CVOVAO.Pll 12-JUL-64 05:04 



50Ari052) 12- JUL -84 09:52 PAGE 63 

T22 TEST THAT DATAINT (RCSA-15) SETS 



SEO 61 



245S 

2454 

2455 

2456 

2457 

2456 

2459 

2460 

2461 

2462 

2463 

2464 

2465 

2466 

2467 

2466 

2469 

2470 

2471 

2472 

2473 

2474 

2475 

2476 

2477 

2476 

2479 

2460 

2461 

2402 

2463 

2484 

2485 

2486 

2487 

2488 

2489 

2490 

2491 

2492 

24«»S 

2494 

2495 

2496 

2497 

2498 



005054 
005054 



005062 
005062 
005070 
005070 
005076 

005100 
OOStOO 
005102 
005102 

005102 
005102 
005110 

005112 
005112 
005114 
005114 
005114 



005114 
005114 



005122 
005122 
005130 
005130 
005136 

005140 
005140 
005142 
005142 
005142 
005142 



012767 005062 174026 



052777 

032777 
001001 



104062 



032777 
001401 



104063 



000002 
100000 



174170 
174162 



100000 174150 



012767 005122 173766 



042777 

032777 
001001 



104064 



000002 
100000 



174130 
174122 



174: 



t75: 



♦ 76; 



nOV «64$.$LPERR 



BIS tfOTR.aRCSR 

BIT •0ATAINT.8RCSR 
BNE »74 



ERROR 62 



BIT 40ATAINT.WCSR 
BEQ 175 



I OTR SETTING SETS OATAINT 
BGNSUB 



ERROR 63 



(SET OTR 

LET BRCSR :- aRCSR SET. BY tOTR 
IF tfOATAINT NOTSETIN WCSR TKN 

I SETTING OTR DID NOT SET OATAINT 
ERRHRO 62., E20ATA 

ENOIF 

IF 40ATAINT SETIN SRCSR THEN 



t READING RCSR DID NOT CLEAR OATAINT 
ERRHRO 63,E0ATAINT 



MOV «64|.tLPERR 



BIC •OTR.WCSR 

Bir «OATAINT.aRCSR 
BNE >76 



ERROR 64 



ENDIF 
ENOSUe 

I OTR CLEARING SETS OATAINT 
BGNSUb 



{CLEAR OTR 
LET aRCSR tftCSR CLR.BY «0TR 

IF •OATAINT NOTSETIN BRCSR THEN 



(CLEARING OTR 0X0 NOT SET DATAINT 
ERRHRO 64..E20ATA 



ENDIF 



ENDSUB 
ENDTST 



Kb 



MAINOeC-ZZ-CVDVA-D MACYH 30A(1052) 12-JUL-S4 09:52 PAGE 64 

CVOVAO.PII 12 -JUL -84 05:04 T22 TEST THAT OATAIMT (RCS«-15) SETS 



SEQ 62 























































00OO04 

WWW ' 








012767 

VAC ■ V ■ 


000010 

\^^^r AW 






012767 

VAC f 9 f 


000025 






















052767 








001004 

V V A^^^^ 






















OOSl 70 










012767 

VA& ■ V > 


OOOOOI 

www A 






00047S 




























2S20 










005900 


012746 

VAC ' 'V 


000340 

ww«^^w 




005204 


012746 

VAC ' ^V 


005212 

W ^C AC 


P5dS 


005210 


000002 

wwvc 






005212 






2S25 


















005212 








005212 


012767 

VAC • V ' 


005220 

w^ccw 


2529 








2530 








2551 


0O522O 






25S2 




042777 


000004 


25SS 








2SS4 








2SSS 


005226 


010546 






005230 


012745 

VAC 


OOOOOI 

WW%^/ A 


25S7 




004767 


v^^v JAC 


2536 


00S240 


012605 

V ACW^ 




2539 








2540 


005242 






2541 


005242 


017705 

VA ■ ' VW 


17401P 

A ' ^VAC 


2542 








2543 


005246 






2544 


005246 


052777 


100000 


2545 


005254 


001401 

WW A^V A 




254^ 








2547 


005256 






2546 


005256 


104065 




2549 


005260 






2550 


005260 






2551 


005260 






2552 








2555 








?554 


005260 







(•TFST 23 TEST THAT OATAINT SETS WHEN RING SETS 

I* AMD THAT OATAINT DUES NOT SET UHEN RING CLEARS 

I* T»€ (-FR) JUMPER MUST BE IN FOR THIS TEST. 

TST23: SCOPE 

MOV tlO.ITIMES iiOO 10 ITERATIONS 

MOV •23.ITESTN nSET TEST NUMBER IN APT MAIL BOX 

t CAN UE USE THE URAPAR0UN07? 
IF •CABLE*FRFO NOTSETIN lUSUR T»CN 

BIT KABLE*FRFD.fUSyR 
BNE 177 

I CAN'T TEST WITHOUT BERG OR H315 
I OR WITH (-FR) JUrf>ER OUT. 
EXIT TST 

MOV #1.$ TIMES 

BR TST24 titEXIT THIS TEST 

ENDIF 

♦ 77: 



641: 



MOV 
MOV 
RTI 



MOV 



BIC 



MOV 
MOV 
JSR 
MOV 



MOV 



BIT 
BEQ 



iNO INTERRUPTS 
«Prt7.-(SP} ttPUT NEW PS ON STACK 

4641. -(SP) iiPUT NEW PC ON STACK 

i tPOP NEW PC AND PS 



I START OFF WITH EVERYTHING CLEAR 
BGNSUB 

«65l . ILPERR 



«REQSEND.«)CSR 



R5.-(SP) 
#1.-(R5) 
PC. WAIT 
(SP)»,R5 



aRCSR.R3 



•OATAINT. 8RCSR 
1100 



ERROR 65 



(CLEAR RING 
LET atCSR :- WCSR aR.BY •REQSEM) 

tUAIT 1 MILLI-SEC FOR CABLE 
WAITMS 1 



I RE AO ONCE 
LET R3 :- WCSR 

:READ TWICE 
IF #OATAINT SETIN iRCSR THEN 



(READING RCSR 010 NOT CLEAR OATAINT 
ERRHRO 65. EOATAINT 



•100: 



ENDIF 

ENOSUB 

SET RING --> SET OATAINT 
BGNSUB 



MAIfCEC-ZZ-CVOVA-D 



MACYll 30A(1052) 12-JOL 84 09:52 PAGE 65 



SEQ 63 



CVOVAO 


Pll 


12-JUL-64 


05:04 


2555 


005260 


012767 


005266 


2556 








2557 








2550 








2559 


005266 






2560 


005266 


052777 


000004 


2561 








2562 


005274 






256S 


005274 


010546 




2564 


005276 


012745 


000001 


2S65 


005302 


004767 


004444 


2566 


005506 


012605 




2S67 


005510 






2568 


005510 


052777 


100000 


2569 


005S16 


001001 




2570 








2571 


005520 






2572 


005520 


104122 




2575 


005522 






2574 


005S22 






2575 


005522 






2576 








2577 








2570 


005522 






2579 


005522 


012767 


005550 


2500 








2501 








2502 


005530 






2505 


005330 


042777 


000004 


2504 








2505 


005336 






2506 


005536 


010546 




2507 


005540 


012745 


000001 




005544 


004767 


004402 


2509 


005550 


012605 




2590 


005552 






2591 


005552 


052777 


100000 


2592 


005560 


001401 




2595 








2594 


005562 






2595 


005562 


104125 




2596 


005564 






2597 


005564 






2596 


005564 






2599 


005564 






2600 


005564 


000400 




2601 


005566 






2602 








2605 








2604 









T23 



TEST THAT OATAINT SETS WHEN RING SETS 



173622 



175764 



175742 



•101: 



175560 



175722 



175700 



«102: 



hOV 



BIS 



nov 
nov 

JSR 

nov 

BIT 



BR 



*64$.$LPERR 



•REQSEW.OtCSR 



R5.-(SP) 
#1.-(R5) 
PC.MAIT 
(SP)».R5 

«OATAINT.0)CSR 
•101 



ERROR 122 



iV€ ARE SETTING RING 
i SET RING 
LET 0tCSR :- mCSR SET. BY •REQSENO 

(WAIT 1 niLLI-SEC FOR CABLE 
UAITMS 1 



IF •OATAINT NOTSfTIN tftCSR THEN 



(SETTING RING 010 NOT SET OATAINT 
ERR»«0 122.. E2DATA 



nov •64^.^LPERR 



BIC MEQSENO.tf^CSR 



nov R5.-(SP) 

nov #1.-(R5) 

JSR PC.UAIT 

nov (SP)».R5 

BIT «0ATAINT.WCSR 

BEQ ^102 



ERROR 125 



ENDIF 
EM)SUB 

I CLEAR RING CAUSES NO CHANGE IN OATAINT (aEAR) 
BGNSUB 



i CLEAR RING 
LET WCSR :- WCSR CLR.BY MEQSEW 

:UAIT 1 niLLl-SEC FOR CABLE 
UAITnS 1 



IF fOATAINT SETIN tftCSR THEN 



TST24 



taEMING RING SET OATAINT 
ERRMRO 125. aRRNG 

ElOIF 
EM)SUB 

EXIT (SKIP AROUW) rCSSAGE 
imEXIT THIS TEST 
ENDTST 



rUIMXC 22 CVOVA O 



riACYli SOAClOU) 12-JUL 



CVOVAO. PI 1 



12-JUL -64 05:04 



T23 



-J 



-64 09:52 PAGE 66 

TEST THAT OATAINT SETS UHEN RING SETS 



SEQ 64 



260? 
















260' 






























OOOOlO 










f61c 
































cOXO 








3riL.t 7 




















OMASA 








































VAC ' 








VAC 


OOM36 






























































MP777 


OOOOlO 
















17S610 










Cv J * 
















































P64S 




OV777 

V JC r r r 














005464 






2646 








P647 






OOOOOl 


2646 




^^^^ • W ' 




P649 


005476 














2651 


005500 


052777 


lOOOOO 


2652 


005506 


001001 

WA W A 




2653 








2654 


005510 






2655 


005510 


104124 




2656 


005512 






2657 


005512 






2656 


005512 






2659 








2660 









175562 
173574 



17S606 



173536 



1 1 

(•TEST 24 

TST24: SCOPE 
nov 

NOV 



BIT 



TEST THAT OATAINT SETS y»CN SECNEC CHANCES STATE 



tl03: 



641: 



NOV 
BR 



NOV 
NOV 
RTI 



173614 



173432 



173574 



173552 



BIC 
NOV 

NOV 

BIS 



NOV 
NOV 
JSR 
NOV 

BIT 



1104: 



#10.ITIf€S 
•24.ITESTN 



•CABLE. lUSyR 
tl03 



•i.t Tires 

TST25 



«P«7..(SP) 
•641. -CSP) 



mOO 10 ITERATIONS 

it SET TEST NUr«ER IN APT NAIL BOX 

t CAN yE USE T»C yRAPAROUM)?? 
IF •CABLE NOTSETIN lUSWR T»CN 



: CAN'T TEST WITHOUT BERG OR HS15. 
EXIT TST 



tiiEXIT THIS TEST 
ENDIF 



I NO INTERRUPTS 
t tPUT NEU PS ON STACK 
t tPUT NEU PC ON STACK 
I tPOP NEU PC AlO PS 



•SECXNIT.OtCSR 
0>CSR.R3 



I START FRESH 

laEAR SECREC 

8RCSR :- 8RCSR CLR.BY •SECXHIT 



LET 
LET 



R3 :- «CSR 



•65I.ILPERR 



•SECXHIT. WCSR 



R5.-(SP) 
•l.-(R5) 
PC. WAIT 
(SP)*.R5 

•OATAINT.«*CSR 
$104 



I SET SECREC --> DATAINT SET 
BGNSUB 



ERROR 124 



(SET SECREC 
LET «K:SR :- tftCSR SET. BY •SECXHIT 

{WAIT 1 NILLI-SEC FOR CABLE 
WAITHS 1 



IF •OATAINT NOTSETIN BRCSR T«N 



t SETTING SECREC DID NOT SET OATAINT 
ERRHRO 124., E20ATA 



ENDIF 
EN0SU8 

jCLEAR SECREC --> OATAINT SET 



NAINOCC-ZZ CVOVA-0 
CVOVAO.Pll 



MACni 30A(1052) 12-JU. 84 
T24 



09:52 PAGE 67 



SEQ 65 



2661 00S512 

2662 005512 
2663 

2664 005520 

2665 00SS20 
2666 

2667 005526 

2660 005S26 

2669 005530 

2670 005534 

2671 005540 

2672 005542 

2675 005542 
2674 005550 
2675 

2676 005552 

2677 005552 

2678 005554 

2679 005554 

2680 005554 

2681 005554 
2682 

2683 
2684 



12 JUL-8* 05:04 
012767 005520 173370 
042777 000010 175532 



010546 
012745 
004767 
012605 

032777 
001001 



104125 



000001 
004212 



100000 173510 



•105: 



TEST THAT QATAINT SETS UHEN SECPEC CHANGES STATE 

BGNSUB 



NOV 



BIC 



MOV 

nov 

JSR 

nov 

BIT 



•64t.tLPERR 
*SECxniT,«CSR 



R5.-(SP) 
♦l,-(R5) 
PC.yAIT 
(SP)*.RS 

«OATAINT.«CSR 

$105 



ERROR 125 



iCLEAA SECREC 
LET SRCSR :- SRCSR CLR.Br #SECXMIT 

:UAIT 1 MILLI-SEC FOR CABlE 
UAITMS 1 



IF •OATAINT NOTSETIN BRCSR THEN 



(CLEARING SECREC 010 NOT SET OATAINT 
ERR»«D 125.. E20ATA 



ENDIF 



ENDSUB 
E»OTST 



NA1IC6C ZZ CVOW* 0 NACTll 
CVOV<K).Pll 12 JUL 94 05:04 



50*(1052) 12 
T24 



JU.-64 09:52 PAGE 66 

TEST THAT DATAINT SETS U»CN SECKEC CHANGES STATE 



SCO 66 



^^5 
















P6A7 








26M 








260V 








2690 








2691 


005554 


000004 




2692 


005SS6 


012767 


000001 


2695 


005564 


012767 


000025 


2694 








2695 








2696 


005572 






2697 


005572 


032 76 7 


000001 


2696 


005600 


001404 




2699 


005602 






2700 


005602 


012767 


000001 


2701 


005610 


000454 




270l2 


005612 






2703 


005612 






2704 


005612 






2705 


005612 


012767 


005620 


2706 








2707 








2706 








2709 








2710 








2711 








2712 


005620 






2713 


005620 


105077 


173444 


2714 








2715 








2716 








2717 


005624 






2718 


005624 


010546 




2719 


005626 


012745 


177777 


2720 


0056S2 


016745 


173426 


2721 


005656 


012745 


000200 


2722 


005642 


012745 


001000 


2723 


005646 


004767 


005622 


2724 


005652 


012605 




2725 








2726 








2727 


005654 






2726 


005654 


105001 




2729 








2750 


005656 






2751 


005656 


104066 




2732 


005660 






2735 


005660 






2754 


005660 






2755 








2756 


005660 






2757 


005660 


012767 


0056<y} 


2756 








2759 








2740 









175574 
175406 



175414 

173350 

173270 



175222 



1 1 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 

UtEST 25 TEST THAT XHIT ROY - TCSH 7 - aEAHS 

I* U»CN TBUT IS LOAOCO UITH A CHNAACTER 

t* AND THAT IT SETS IHTHIN A REASONABLE ANOUNT OF TINE. 

TST25: SCOPE 

NOV •I.ITINES iiOO 1 ITERATION 

HOV •25.ITESTN nSET TEST NUTQCR IN APT HAIL BOX 

I THIS TEST IS 'BREAK OR HALT* SINSATIVE. 
IF MPTENV SET IN lEHV THEN 

BIT #APTENV.IENV 
BEQ 1106 

EXIT TEST 

NOV •I.ITINES 

BR TST26 itiEXiT THIS TEST 

ENDIF 

1106: 

BGNSUB 

NOV tMI.ILPERR 

I LOAD TBUF UITH ONE CHARACTER 

I IMIT FOR READY TO SET 

I (SHOULD BE VERY SHORT UAIT 

I SINCE UART DOUBLE BUFFERS ITS l^Jl) 

iSElO A CHARACTER 
LET 8TBUF :B- M 

CLRB 8TBUF 

lUAIT A NAXINUH 
lOF 50 NSEC FOR 
3 XHIT ROY TO SET IN TCSR 
CALL TirCR IN < #1000. #XMITROY. TCSR. •SET> 

NOV RS.-(SP) 
NOV #SET.-(R5) 
NOV TCSR.-(R5) 
NOV •xniTROY.-(RS) 
NOV •1000.(R5) 
JSR PC.TINER 
NOV (SP)*.R5 

iTINER RETURNS AN ERROR IF BIT DID 
I NOT NEET COW)ITION UITHIN TIfC LINIT 
IF. ERROR T»€N 

BCC 1107 

iXniT ROY DID NOT SET IN TCSR 
ERR»«D 66..DIDN0T 

ERROR 66 

ENDIF 

1107: 

ENDSUB 
BGNSUB 

NOV •64I.ILPERR 

I LOAD TBUF UITH A SECOND CHARACTER 

I CHECK INNEDIATELr THAT XNITRDr IS Cl EAR 

I MO T»CN UAIT FOR IT TO SET 



nAIICeC U CVOVA 0 nAC>ll S0A(1052) 12 JUL 04 09:52 PAGE 69 

CVOVAO.PU 12 JUL 84 05:04 T25 TES' THAT XMIT »0t TCS« 



^■'41 














2 ■'42 














2745 


005666 












2744 


005666 


105077 


173376 






BTBUF 


2745 


005672 


000240 








&^^A 

NOP 


2746 














2 ■'4"' 














2746 


005674 












2749 


005674 


052777 


000200 


173362 


ATT 

BIT 


AWMTT^tf\w AT/^^n 


2750 


005702 


001401 






BcO 


1110 


2751 














2752 


005704 












2753 


005704 


104067 






ERffOR 


67 


2754 


005706 












2755 


005706 






• 110: 






2756 














2757 














2756 














2759 














2760 


005706 












2761 


005706 


A* fig a t 

010546 






nov 


k5, -iSP) 


2762 


005710 


012745 






nOV 




2763 


^W^K7« ^ 

005714 


016745 


173544 




nuV 


TCSR, -CR5) 


27fc4 


005720 


012745 


000^00 




nov 


•W1ITH0T , - (R5) 
#1000. -(k5 ) 


2765 


005724 


/\« ^7^K 

012745 


001000 




nOV 


2766 


005750 


004767 


AAWK A A 

003540 




JSh 


PC.TlnER 


2767 




A« r>f 

012605 






rmiV 


(SP)»,R5 


2766 


005756 












2769 


005736 


105001 






BCC 


till 


2 ' 70 














2771 


fl fig" A 

005740 












c 1 le 


MVK7A/\ 


i04U 'U 






CNNUN 


70 


2773 


005742 












2774 


005742 






till: 






2775 


005742 












2776 


005742 













SCO 67 



CLEARS 



I SEND SECOK) CHMACTER 
LET STBUr :e* 40 

I GIVE IT TI»C TQ CLEAR 

I XHITROY SHOULD HAvE CLEARED iJPQN 
I RECEIPT OF A C»«WACTER 
IF •XniTROY SETIN 8TCSR T»€N 



xniTRDY DID NOT CLEAR IN TCSR 
67..DIDN0T 

EWIF 



iHAIT A riAxinuH 
lOF SO MSEC FOR 
iXniT ROT TO SET IN TCSR 
CALL TIMER IN <•! 000. •VHI TROY. TCSR. •SET* 



IF. ERROR ThCN 



iXniT ROY DID NOT SET IN TCSR 
ERR»«0 7O..0I0N0T 



EM) IF 



EM)SUB 
EtOTST 



riAifOf.C-z; CvDVA O 
CVOVAO.Pll 12-JU. 



flACTll 3OA(1052) 12 JUL 
S« 05:04 T25 



64 09:52 PAGE 70 
TEST THAT XMIT ROY 



SEQ 66 



TCSR 7 • CLEMS 



—t ^9 ^ ^ 








2776 








2779 








2760 








2761 








2762 








2'83 


005 74^ 


OOOUO* 




2764 


005744 


012767 


/WWW\t A 

000010 


2765 


005752 


012767 


0O0O26 


2786 








2 for 








2766 


005760 






2769 


0O5 iWJ 




/^^^M\A 


2 '90 








2791 


005 766 






2 1^2 


005766 


012767 


^^K77A 

0v5r f# 


2'93 








2'9« 








2795 


UU57 f# 






2796 


\/v5 » 


1U50 r ' 




279' 








2Tt9 








2fy^ 


















006000 






COO*: 


0O6OOO 


Ulv540 






/WM-^^O 

006v0e 


A t 07AC 
Olc »*5 


1 77777 

\ 1 1 1 1 f 




006006 


At A7AC 

016 7*5 


1 73246 


20TO 


006012 


At 074IC 

012 7*5 


^^\AOAA 

000200 


cIKJ6 


0U6O16 


At 07^C 


^%t 

OOlOOO 




006022 


AAA Y£ ^ 

004767 


003446 




006026 


At "fc^ AC 

012605 












2010 








e611 


006030 






e612 


006030 


103001 




2013 








OAl A 

2014 


006092 






2013 


006032 


t AAA7 t 

104071 




4c016 


0U6034 






OAf 7 

201 ' 


O06O34 






cOlO 








OA« O 

COIT 


006034 






OA OA 

cO«fO 








cO<ri 








3>00 


0U6034 


At 07AY 

012767 


006042 


cOc3 








coc^ 








2625 


006042 






2626 


006042 


000005 




2827 








2626 


006044 







17S206 
175220 



175276 
173114 



i*TEST 26 TEST THAT OUTPUTTING A CHAft FROn TBUF (UITH NAINT SET) 

I* RESULTS IN RCVROONE SETTING WITHIN A REASONABLE AMOUNT OF TIME 

I* AND THAT RESET aEARS THE BIT. 

TST26: SCOPE 

NOV •lO.ITINES iiOO 10 ITERATIONS 

NOV •26.ITESTN tiSET TEST NUTQER IN APT NAlL BOX 



BIS 
NOV 

CLRB 



NOV 
NOV 
NOV 
NOV 
NOV 
JSR 
NOV 



BCC 
ERROR 



1112: 



17S046 



NOV 



RESET 



4NAINT.0TCSR 



I SET THE NAINTENANCE BIT 
LET 8TCSR STCSR SET. BY fNAINT 



BGNSU6 

•64I.ILPERR 

I SEND A CHARACTER AND LET IT URAP AROUND 



8TBUF 



R5.-(SP) 

#SET.-(R5) 

RCSR.-(RS) 

«RCVRO0NE.-(RS) 

•1000, -(R5) 

PC.TirCR 

(SP)».R5 



• 112 



71 



LET 8TBUF :B- 40 



t UAIT A NAXINUN QF 50 NSEC 
I FOR RCVR DONE TO SET IN 
i RCSR 

CALL TINER IN <41000.«RCVR00NE.RCSR.4SET> 



iOIDN'T SET IN TI« 
IF. ERROR THEN 



I RCVROONE DID NOT SET IN RCSR 
ERRHRD 71..0IDN0T 



ENOIF 



EN0SU8 
BGNSUB 

I . tLPERR 

I NOW THAT IT IS SET SEE IF IT CAN BE RESET 
I THIS ALSO UILL CLEAR THE NAINT. BIT 

BRESET 



IF MCVRDONE SET IN 8RCSR THEN 



nAirOEC ZZ-CVOVA-O MACni 50A(10S2} 12-JUL-84 09:52 P/«£ 71 

CVOVW.PII 12-JUL-a4 05:04 T26 TEST THAT OUTPUTTING * CHMt FROM TBUF (UITM MAINT SET) 

2629 O06O44 OS2777 000200 173206 BIT MCVROONE .iRCSA 

2650 006052 001401 BEQ tll5 

fSH » RCVROONE 010 NOT RESET IN RCSR. 

2852 006054 ERRHRD 72. .OIDNQT 

2655 006054 104072 ERROR 72 

2654 006056 EKOIF 

2655 006056 «115: 

2656 006056 EMDSUB 

2657 006056 ENDTST 



rWINOCC -ZZ- CVOVA-0 





Pi 1 


12-JUL-64 


05:04 




































006056 


000004 






006060 


012767 


OOOOlO 




006066 


012767 

VAS ■ V • 


000027 




















006074 








006074 


052777 


000004 




006102 








006102 


012767 

W AK ■ W ■ 


006110 

WWW A AW 


















pass 
















pass 


006110 






?as6 


006110 


105077 


175154 


pas 7 








pasa 








P6S9 








Pa60 


006114 






2661 


006114 


010546 




Pa6P 


006116 


012745 


177777 


2863 


006122 

V^^f A&4~ 


016745 


1751S2 

A • » A 


2064 


006126 


012745 


000200 


2865 


0061S2 


012745 


001000 


2866 


006136 


004767 


00S332 


2667 


006142 


01260*' 




2868 








2869 


006144 






2870 


006144 


lOSOOl 




2871 








2872 


006146 






28 7S 


006146 


104073 

AW • ^ 




2874 


0061SO 






2875 


006iSO 






2876 


0061S0 






2877 








2878 








2879 








2860 








2661 








2862 


0061S0 






266 S 


006150 


117700 


173106 


2864 








2665 


006154 






2666 


006154 


0J2777 


000200 


2667 


006162 


001401 




2666 








2669 


006164 






2890 


006164 


104074 




2891 


006166 






2692 


006166 






2895 


006166 







NACni S0A(1052) 12 
T26 



t- b 

JUL-e4 09:52 PAGE 72 
TEST THAT OUTPUTTING 



SEQ 70 



17J072 
17S104 



17S162 
173000 



••TEST 27 

TST27: SCOPE 
MOV 

nov 



BIS 



A CHAR FROH TBUF (WITH HAINT SET) 



TEST THAT RCVROONE IS CLEARED BY READING RBUF 



nov 



CLRB 



nov 
nov 
nov 
nov 
nov 

JSA 

nov 



BCC 



1114: 



173076 



•lO.tTinES 
•27,ITESTN 



•nAINT.BTCSR 



iiDO 10 ITERATIONS 

tiSET TEST NUnBER IN APT nAIL BOX 

I SET nAINT. BIT 
LET 8TCSR :• 8TCSR SET. BY «nAINT 



BGNSUB 
•64I,ILPERR 

t OUTPUT A CHARACTER WITH HAINTENANCE 
I SET. AND WAIT FOR XHITROY TO SET. 



8TBUF 



R5.-(SP) 

#SET.-(R5) 

RCSR.-(R5) 

«RCVRD0NE.-(R5) 

•1000. -(RS) 

PC.TlnER 

(SP)*.R5 



tll4 



t OUTPUT A CHARACTER 
LET 8TBUF :B- «0 

I WAIT NAxinun OF 1000 nsEC 

I FOR RCVROONE TO SET IN 
I RCSR 

CALL TinER IN <«1000.«RCVR00NE. RCSR. •SET 



ERROR 75 



I DID IT BECA^E READY? 
IF. ERROR THEN 

(RCVROONE DID NOT SET IN RCSR 
ERRHRO 73.. OIDNOT 



ENDIF 
ENDSUB 

t NOW THAT IT IS SET LETS SEE IF READING THE 
t BUFFER CLEARS RCVROONE. 



novB W6uf.ro 



BIT #RCVR00NE.«)CSR 
BEQ Ills 



ERROR 74 



I READ BUFFER 
LET RO :B- 8RBUF 



IF tRCVROONE SETIN ««CSR THEN 



i RCVROONE DID NOT CLEAR IN RCSR 
ERRHRO 74. OIDNOT 



IllS: 



ENDIF 



ENDTST 



MAIIOCC-ZZ-CVOVAO NACril S0A(10S2) 12-JUL-64 09:52 PAGE 75 

CVOVAO.Pil 12JUL -84 05:04 T27 TEST THAT RCVNOONE IS CLEARED Br READING RBUF 



SEQ 71 



PII94 
























CO" ■ 


























006166 


000004 








012767 


000010 


P40P 


006176 


012767 


000050 










PQ04 










006204 








006204 


032767 


000001 


2907 


006212 


001404 






006214 






2909 


006214 


012767 


000001 




006222 


000500 






006224 








006224 






2913 


006224 






2914 


006224 


052/77 


000004 


2915 


006232 






2916 


006232 


012700 


000000 


2917 


006236 






2918 


006236 


005001 




2919 








2920 








2921 








2922 








2923 


006240 






2924 


006240 


105077 


175024 


2925 


006244 






2926 


006244 






2927 


006244 






2928 




052777 


004000 


2929 


006252 


001405 




29S0 


006254 






2931 


006254 


012700 

VAC • W 


177777 


2952 


006260 






2935 


006260 


000401 




2954 


006262 






2955 


006262 






2956 


006262 


005201 




2957 


006264 






2958 


006264 






2959 


006264 






2940 


006264 


020027 


177777 


2941 


006270 


001405 




29*2 


006272 


020167 


000124 


2945 


006276 


101762 




2944 


006500 






2945 


006500 






2946 


006500 


020167 


000116 


2947 


006304 


101407 




2948 








2949 









172762 
172774 



175002 
172756 

173052 



1 1*************************************************************** 

liTEST 50 TEST THAT RCVRACT - RCSR 11 - SETS ••••••• 

I* UNEN A START BIT IS RECEIVED AND 

I* aEARS WHEN RCVRDONE • RCSR 7 - SETS 

TST50: SCOPE 

nOV •lO.ITINES itDO 10 ITERATIONS 

NOV •SO^ITESTN uSET TEST NU»«ER IN APT HAIL BOX 

I THIS TEST IS 'BREAK OR HALT' SINSATIVE. 
IF MPTENV SETIN lENV T»CN 

BIT •APTENV.IENV 
BEQ 1116 

EXIT TEST 

NOV #1.» TIMES 

BR TST51 iiiEXIT THIS TEST 

ENDIF 

1116: 

LET BTCSR :- STCSR SET. BY 4MAINT 

BIS WIAINT. BTCSR 

LET RO :- #CLR 

nOV KLR.RO 

LET Rl :- 40 

CLR Rl 

iLOAO A CHARACTER INfO TBUF 
lUAIT FOR RCVRACT TO SET 



• 117: 



175006 



• 120: 



1121: 



• 122: 



CLRB 8TBUF 

BIT «RCVRACT.aRCSR 

BEQ •120 

NOV tSET.RO 

BR •121 

INC Rl 



CHP RO.#SET 

BEQ •122 

CMP Rl.MAX 

8L0S ^117 



CMP Rl.MAX 
BLOS ^125 



:SENO A CHARACTER 
LET aTBUF :B- #0 

REPEAT 

IF CRCVRACT SETIN BRCSR THEN 



LET RO :• WET 



ELSE 



Rl ♦ #1 



LET Rl 
ENDIF 

UNTIL RO EQ •SET OR Rl HI MAX 



IF Rl HI MAX THEN 



I IT NEVER SET 

I RCVRACT 010 NOT SET IN RCSR. 



NAIMXC-ZZ-CVOVA-O 



MACni 50A(1052) 12-JU.-S4 09:52 PWJE 74 







12- JUL -64 




006306 






006306 


104075 




OO6310 








017700 


74SA 


006S14 




94S% 


006S14 


012767 




006 S22 


000440 


c y ' • 


006324 






006524 


































P464 








006324 






006324 






006324 


032777 


?S66 


006332 


001416 








2970 


006334 




P97i 


006^34 


032777 




006342 


001411 


2973 


006 344 




2974 


006344 


052777 


2975 


006352 


001405 


2976 






2977 






2976 


0063b4 




2979 


006354 


104076 


2960 






2961 


006356 




2962 


006356 


012767 


2963 


006564 


000417 


2964 


006366 




2965 


006566 




2966 


006366 




2967 


006366 




2966 

C 7%^W 


006 366 




2969 


006366 


000756 


2990 


006370 




2991 






2992 






2993 


006370 




2994 


006370 


052777 


2995 


006576 


001001 


2996 






2997 


006400 




2996 


006400 


104077 


2999 






3000 


006402 




3001 


006402 




3002 






3003 






3004 






3005 







T50 



TEST THAT RCVRACT - RCSA 11 - SFTS 



172746 
000001 



172656 



• 125: 



004000 172726 



• 124: 



000200 
004000 



172716 
172706 



000001 172574 



• 127: 

• 126: 

• 125: 



000200 172662 



• 150: 



ERROR 

MOV 

MOV 
BR 



BIT 
BEQ 



BIT 
BEQ 

BIT 
BEQ 



75 

aR6UF.R0 

«l.^riHES 

TST51 



SEQ 72 

ERRHRD 75.. OIDNOT 

LET RO MtBUF ; CLEAR BUFFER 

EXIT TEST 



MiEXIT THIS TEST 
ENOIF 



(CHECK FOR TIMING OF RCVRACV. CLEARING 
iVS RCVROONE SETTING 



•RCVRACT. OtCSR 
• 125 



•RCVROONE. 8RCSR 

• 12v, 

•RCVRACT. 8RCSR 

• 127 



ERROR 76 



MOV •!. (TIMES 
BR TST31 



BR (124 



BIT •RCVROONE. 8RCSR 
BNE •ISO 



ERROR 77 



WHILE MtCVRACT SETIN BRCSR 00 

IF MKrVROONE SETIN StCSR THEN 
IF MICVRACT SETIN BRCSR THEN 



iRCVROONE AND RCVRACT 
iBOTH SET 

ERR»«0 76. OOiCACT 

I NO USE CONTINUING 
EXIT TST 



niEXIT THIS TEST 



E»OIF 
E»OIF 
ENODO 



iRCVRACT - 0 NOW. 

IF «RCVRDONE NOTSETIN 8RCSR THEN 



I RCVROONE DID NOT SET IN RCSR 
ERRHRD 77..0I0N0T 

I SET IT BACK. 
ENDIF 



iTEST THAT READING THE RECEIVER 
I BUFFER CLEARS RCVROONE 



MAirCeC-ZZ-CVOVA-O «ACril 30A(1052) 12 

CVOVAO.Pll 12-JU.-84 0S;04 T30 



3006 
5007 
3006 
5009 
5010 
5011 
5012 
5015 
5014 
3015 
5016 
5017 
5018 
5019 
5020 
5021 
5022 
5025 
5024 



006402 

006402 017700 1726S4 
006406 

006406 052777 000200 172M4 
006414 001401 

006416 

006416 104100 

006420 

006420 

006420 

006420 000401 
006422 070000 

006424 



JUL -84 09:52 PAGE 75 

TEST THAT RCVRACT - RCSP 11 • SETS 



nov weuF.Ro 



SEQ 73 



BIT «RCVROONE.aRCSR 
BEQ $131 



ERROR 100 



(READ CHAR. 
LET RO :- 8RBUF 



IF 4RCVRD0NE SET IN WCSR THEN 



iRCVROONE 010 NOT aEAR IN RCSR 
ERRHRD 100..0IDNOT 



1151: 



BR TST51 
MAX: 70000 



ENOIF 



EXIT 

uiEXIT THIS TEST 



ENOTST 



MAINOEC-ZZ-CWOVA-0 MACtll 50A(10S2} 12 

CVOVAO.Pll 12 JUL -84 05:04 T30 



JUL-64 09:52 PAGE 76 

TEST THAT RCVRACT • RCSP 11 - SETS 



SEQ 



















JVC 1 
















JVC 7 












000004 






0O6AP6 


01P767 

VAC • V ■ 


000010 

W^^/ A V 




OOM54 


012767 

VAC ■ V ■ 


OOOOSi 

VWV^^A 


jv J J 








VIVA 












01P767 

VXC • V ' 


006450 


JV JO 
















JV JO 








-J y 


















006450 








006450 


105077 

AV^V • • 


172614 

A • CV A~ 










.TV * • 


0064S4 










010546 






006456 


012745 

VAC • 


002000 

wc vw 


1047 


00646P 


004767 

W • » V ■ 


005264 




006466 


012605 




5049 








5050 








5051 


006470 








006470 


105077 

A Vi^V f • 


172574 

A ' C J ' ~ 


3055 




















V A V 




S056 


006476 


VAC ' 


OO2OO0 


5057 


0O65OP 


\^^^ » V ' 


0OS244 




006 S06 


vACVv J 




50S9 








3060 








3061 


006510 






5062 


006510 


017704 

V A ' ' V • 


172S46 


5065 








5064 








3065 


006514 






3066 


006514 


052704 

Vv'C ' 


040000 


3067 


006520 


001005 




3060 








3069 


006522 






3070 


006522 


104101 

Al^^ AV A 




3071 








3072 








3075 


006524 






3074 


006524 


012767 


000001 

VWWA 


3075 


006532 


000456 




3076 


006534 






3077 


006534 






3078 


006534 






3079 








3060 









t »••••••••••••••••••••••♦•••••••••••••••••••••••••••••••••♦•••••• 

!*TEST 31 TEST THE OVERRUN BIT - RBUF 14 

TST31: SCOPE 

NOV tlO.ITIMES 1 1 DO 10 ITERATIONS 

NOV tSLITESTN 1 1 SET TEST IMSER IN APT HAIL BOX 

BGNSUB 

NOV •64I.ILPERR 

t OUTPUT 2 CHARACTERS UITH 

I AMPLE DELAYS BETUEEN FOR RECEPTION. 

iTHIS SHOULD AN CAUSE OVERRUN ERROR. 



CLRB 



NOV 
NOV 
JSR 
NOV 



CLR8 



NOV 
NOV 
JSR 
NOV 



NOV 



BIT 



NOV 
BR 



1132: 



8TBUF 



R5.-(SP) 
♦1024., -(R5) 
PC. WAIT 
(SP)».R5 



8TBUF 

R5.-(SP) 
♦1024.. -(R5) 
PC.UAIT 
(SP)^.R5 



.R4 



♦0RERR>R4 

1132 



ERROR 101 



♦1.1 TIMES 
TST32 



I OUTPUT 1 CHARACTER 
LET 8TBUF :B- dO 

iGO AUAY FOR 1024. II SEC 
UAITNS 1024. 



(OUTPUT 2ND CHARACTER 
LET 8TBUF :B« ♦O 

:LET OVERRUN HAPPEN 
UAITMS 1024. 



{READ BUFFER A»0 ERROR SITS 
LET R4 :- SRBUF 



I IT DIDN'T SET 
IF «ORERR NOTSETIN R4 THEN 



lORERR DID NOT SET IN RBUF 
ERRHRO 101..DIONOT 



I NO USE COMPOUNDING ERRORS 
EXIT TST 



tiiEXIT THIS TEST 
ENDIF 



ENDSUB 

iNOU SEE IF ERROR BIT SET UITH OVERRUN ERROR: 



Kb 
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5081 


006554 


















BGNSUB 


5062 


006554 


012767 


006542 


172546 




MOV 


#64$.ILPERR 








5065 


00654? 


















IF ♦ERROR NOTSETIN R4 THEN 


5064 


006542 


052704 


100000 






BIT 


4ERP0R.R4 








5065 


006546 


001005 








BNE 


tl55 








5066 






















5067 




















(ERROR DID NOT SET IN RBUF 


5066 


006550 










ERROR 








ERRHRD 102..DIONOT 


5069 


006550 


104102 








102 








5090 






















3091 




















i-'MEH ORERR SET. 


5092 




















(GET OUT NOW. 


5091 


006552 


















EXIT TST 


3094 


006552 


012767 


000001 


172400 




NOV 


«1,»TINES 








5095 


006560 


000445 








BR 


TST52 


J 1 jEXIT 


THIS TEST 


5096 


006562 


















ENDIF 


5097 


006562 








1155: 












5096 


006562 


















ENDSUB 


5099 






















3100 


006562 


















BGNSUB 


5101 


006562 


012767 


006570 


172520 




NOV 


«64».$LPERR 








5102 














t CHECK REAL RBUF 


TO 


SEE IF ORERR IS STILL SET. 


5103 






















5104 


006570 


















IF MRERR NOTSETIN WBUF THEN 


5105 


006570 


052777 


040000 


172464 




BIT 


•ORERR.WBUF 








5106 


006576 


001002 








BNE 


•134 








5107 






















5106 




















i READING RBUF CLEARED ORERR. 


3109 


006600 


















ERRHRD 105.ITCLRED 


5110 


006600 


104105 








ERROR 


105 






5111 




















sSKIP REST OF TEST 


5112 


006602 


















EXIT 


5115 


006602 


000452 








BR 


TST52 


tttEXIT 


THIS TEST 


5114 


006604 


















ENDIF 


5115 


006604 








•134: 












5116 


006604 


















ENDSUB 


5117 






















5118 


006604 


















BGNSUB 


5119 


006604 


012767 


006612 


172276 




NOV 


•64».»LPERR 








5120 














iNOU SEE IF 


THEY 


CLEAR WHEN ANOTHER CHAR. IS RECEIVED 


5121 






















512? 




















I SEND A CHARACTER AROUND. 


5125 


006612 


















LET 8TBUF :B- ♦O 


5124 


006612 


105077 


172452 






CLRB 


8TBUF 








5125 




















iLET IT CIRCULATE 


5126 


006616 


















UAITNS 1024. 


5127 


006616 


010546 








NOV 


R5.-(SP) 








5128 


006620 


012745 


002000 






NOV 


♦1024... (R5) 
PC. WAIT 








5129 


006624 


004767 


005122 






JSR 








5150 


006630 


012605 








NOV 


(SP)».R5 








5151 






















5152 


006652 


















IF ♦ORERR SET IN 8RBUF THEN 


5155 


006652 


052777 


040000 


172422 




BIT 


•ORERR.WBUF 








5154 


006640 


001405 








BEQ 


•155 








5155 




















t ORERR DID NOT CLEAR IN P9UF 


5136 


006642 


















ERRHRD 104..0IDNOT 
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5137 006642 104104 EMOR 104 

5138 

5159 

5140 

5141 006644 

5142 006644 012767 000001 172306 riOV •I.ITINES 
5145 006652 J00406 BR TSTS2 

5144 006654 

5145 006654 tl55: 
5146 

514 7 006654 

5148 006654 052777 JOOOOO 172400 BIT •ERROR, WBUF 

5149 006662 001401 BEQ «136 

5150 

5151 006664 

5152 006664 104105 ERROR 105 

5155 

5154 006666 

5155 006666 1136: 

5156 006666 

5157 006666 

5156 006666 000400 BR TST32 

5159 

5160 006670 
3161 



SEQ 76 

RBUF 14 



i -AFTER RECEIVING ANOTHER CHAR 
(SKIP AROUND REST 
EXIT TST 

iliEXIT THIS TEST 
ENOIF 



IF «ERR0R SET IN W8UF THEN 



{ERROR DID NOT CLEAR IN RBUF 
ERRHRO 105..DI0N0T 



EM)IF 

ElOSUB 
EXIT 

illEXIT THIS TEST 
.EVEN 
ENDTST 



riAINDtC ZZ-CVOVA 0 MACYll 
CVOVAO.Pll 12-JU. 84 05:04 
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5162 








5165 








5164 








5165 








5166 








5167 








5160 








5169 








5170 


006670 


000004 




5171 


006672 


012767 


000010 


5172 


006700 


012767 


000032 


5175 


006706 






5174 


006706 


032767 


000200 


5175 


006714 


001004 




5176 


006716 






5177 


006716 


012767 


000001 


5178 


006724 


000552 




5179 


006726 






5180 


006726 






5181 








5182 


006726 






5185 


006726 


032767 


000001 


5184 


006734 


001404 




5185 


006736 






5186 


006736 


012767 


000001 


5187 


006744 


000542 




5188 


006746 






5189 


006746 






5190 








5191 


006746 






5192 


006746 


012767 


177777 


3193 


006754 






3194 


006754 


012767 


177777 


3195 


006762 






3196 


006762 


052777 


000004 


3197 








5198 


006770 






5199 


006770 


005003 




5200 


006772 


000401 




5201 


006774 






3202 


006774 


005203 




5205 


006776 






5204 


006776 


020527 


000017 


5205 


007002 


003060 




5206 


007004 






5207 


007004 


017700 


172252 


5208 








3209 


007010 






3210 


007010 


116377 


007170 


3211 








3212 


007016 






3213 


007016 


005002 




3214 








3215 


007020 






3216 


007020 


005077 


172244 


3217 









1 1 ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 

!*TESr S2 PROGRMtMSLE BAUD RATE TEST 

I* TEST AT ALL SPEEDS AVAILABLE 

A COHPARISGN WILL BE MADE TO SEE 
I* IF NEU TIME IS LESS THAN PREVIOUS. 

TST52: SCOPE 

nov •lO.tTinES mDO lo iterations 

NOV •52.tTESTN siSET TEST NUr«ER IN APT MAIL BOX 

IF tPBR NOTSETIN lUSM T»CN 

BIT «PBR.tUSWR 
BNE 1137 

EXIT TST 

NOV •l.tTINES 

BR TSTS3 iiiEXIT THIS TEST 

ENDIF 

• 137: 

i THIS TEST IS 'BREAK OR HALT' SINSATIVE. 
IF MPTENV SETIN lENV THEN 

BIT MPTENV.IENV 
BEQ 1140 

EXIT TEST 

NOV •I.ITINES 

BR TSTS3 iiiEXIT THIS TEST 

ENDIF 

1140: 

LET OLD :• #-1 

NOV t-LXD 

LET X0*2 :- 

NOV •-l.XD*2 

LET 8TCSR :- 8TCSR SET. BY CNAINT 

BIS fmiNT.BTCSR 

I EACH BAUD RATE 
INCR R3 FROn M TO •15. BY *1 

CLR R3 
BR tl41 

tl42: 

INC R3 

1141: 

CNP R3.«15. 
BGT 1143 

LET RO :- 0«UF 

NOV WBUF.RO 

{CHANGE BAUDE AATE 
LET 8TCSRHI :B> RATES(R3) 

NOVB RATES(R3).BTCSRHI 

;FLAG 
LET BIT :- #0 

CLR BIT 

; OUTPUT THE CHARACTER 
LET 8TBUF #0 

CLR 6TBUF 

J INITIALIZE COUNTER 



MAINOEC U CVOVA 0 



MACni 30A(10S2) 12 JUL S4 09:52 PAGE 60 



LVUVMU 


oil 


19 HI AA 

Lc 


OS •CM 




»Uc* 








WU'Uc* 


nn^AA7 

WDVO 1 


00091 9 












/>o7nx/) 


W/9vO » 


00091 O 




A07nX4 








nn7nxA 
















/v>7nxik 


M)iniA 




X^04^ 


nn7nAn 






<*: ' 


fy)7MO 


OXP777 

v JC ' » • 


OOOPOO 






lA^ 1*WJ 














(V)7nv) 








nn7fMA 


01 9709 
wXc ' vc 


000001 


5c 3c 


jvt7n^^ 








no7n^^ 


OOAAAA 




JcA* 








3c J J 










f VPO 






ACJ ' 




00^9^7 
^A/^Cw ' 


OOOIItO 


9c 30 








3c 3 T 


nn7nfk3 

SAi '^Oc 


^V930 ' 


0001 


OC^V 








3c' 1 








Oc^c 








3C^O 








JC^^ 


no 7 AM 


0007ftP 
\AA/ • wc 




3C^ J 








JC^I 








X3A7 
3c^ ' 








XP4M 




09<>7A7 


0001 SO 
UWX9V 


IPAQ 




1 0X001 




JC 








3c31 


nn7 1 






3c3c 




9 

WaI*1«: 






WW ' AUc 






JC^^ 










VA^ r Xwc 






3C^v 


IW ' tUc 


09A7iL7 
vcO rO r 


0001 XiL 


3c3 ' 


M>71 1 n 


001 on^ 




3c30 


An7l 1 3 
W r IXc 


09&7JL7 


0001 9A 






lOXOOl 




Jew 










UV • Icc 






3cvc 




OOOAAI 
\AA**vi 






f Xc^ 






>cO* 








^Cv? 








jc^ro 








JCv ■ 
















9cO~ 




lAAlPIt 
X^'^XCD 




•XT rv 








5271 


007126 






5272 


007126 






5275 


007126 







T52 



PROGRMtMBLE BAUD RATE TEST 



$144: 



$146: 



1147: 



>145: 



tlSO: 



tlS2: 



♦ 153: 

♦ 151: 



CLP 
CLR 

TST 



BIT 
BEQ 



NOV 
BR 

INC 
AOC 

BR 



BR 



CMP 
BNE 
CMP 
BHIS 



BR 



NEU 
NEU*2 



BIT 
«145 



•RCVRDONE.aRCSR 
$146 



•l.BIT 
♦ 147 



NEU 
NEU»2 

• 144 



CMP NEU*2.X0*2 
BHIS tlSO 



1151 



NEU*2.X0*2 
tl52 
NEU. OLD 
<152 



n55 



ERROR 126 



SCQ 78 



LET NEU :- 40 
LET NEU»2 40 
UHILE BIT EQ M DO 

IF «RCVROONE SET IN 0)CSR THEN 

.-DONE - ITS READY 
LET BIT :- #1 

ELSE 

sOT»€RUISE- INCREMENT TIME 
LET NEU :- NEU • •! 

LET NEU«2 :- NEU«2 * CARRY 

ENDIF 

: SIGNALS DONE 
EfOOO 

IF NEU*2 LO 0LD*2 THEN 
: OK 

ELSE 

s NEU*2 >- 0LD*2 

IF NEU*2 EQ 0LD*2 AND NEU LO OLD THEN 



«0K 

ELSE 



iNEU»2 > CLD*2 OR 
s(NEU«2 > XD*2 AND 
: NEU >- OLD) 
tBAUD RATE DIDN'T CHANGE 
ERRHRD 126. BAUDRATE 



ENDIF 
ENDIF 



nAl»CCC Zl 
CVOVAO.PII 



CVOVA 



0 

JU. 



64 



3i ' * 






» ~i 7^ 

5< 'J 






■ ^ 7A 




UXO > D ' 




rM7 1 U 








A 1 4k 7<k 7 
VXO ' O ' 


■ ^ 70 








M^7 1 A3 








MM? 1 A 
' X^ 








SCO'S 


fW)71 AA 






/V>71 AA 


X XO f 






1 m^Ait 

X Xw3^0 




M7I V 


X^c ' XO 














OAQ 


M7I 


X XO ^ ' ' 


• ->^^ 






UQ1 










OOOASl 

^A^^'wX 










M)71 7n 
















X» ' 






































M171 7n 


uxu 




fM71 71 






(M71 73 






(M71 7X 
'1*3 


070 


r 


M171 7A 


X XV 


ISM 


M7I 7S 


X ^/ 




M)71 7<k 


X J*^ 




(M7I 77 


1 70 

X 'w 


111 1 




cxv 




» cVl 


CSV 


111 V 


M73A3 


9^ 
s3V 


3 




P70 


h J 


007PO4 


110 

JXV 


5S16 


007205 


550 


551 ; 


007206 


550 


5516 


007207 


570 


5519 







MACUl 50A(1052) \i 
05:0* T52 



000110 000112 
000104 000106 



JUL 64 09:52 PAGE 81 
PftOGRArtMetE BAUD RATE 



SEQ 79 



rtST 



172051 
000017 

007170 172100 



1145: 



MOV 
BR 



novB 
novB 
BIC6 
BICB 

nova 



BR 



NEU.OLO 
NEU.2.0L0*2 

1142 



IUSWR*1.RS 
R5.-(y) 
#17. (SP) 
(SP)».R3 



I UPDATE XO TIME 
LET XD NEW 



LET X0*2 :- NEU*2 
ElOINC I BAUD RATE 
LET R5 :B- lUSUR.l AND #17 



LET 8TCSRHI :B- RATES(R5) 
RATES(RS).8TCSRHI 



PUT BAUD BACK 



LIKE »€ WANTED H 



TST55 



EXIT I SKIP TABLE 
lllEXIT THIS TEST 



RATES: |A TABLE OF T»C ACTUAL BYTES TO MOVE INTO THE 
lUPPER BYTE OF XCSR FOR EACH BAUD RATE 



t** NOTE:: 



T»€ VALUE IIOICATEO IN T»C CXUMN 'OFFSET 
INTO TABLE' CAN BE PLACED INTO BITS<ll:e> 
OF LOCATION ' lUSUR' TO CAUSE THE CORROSPONDING 
BAUD TO BE SELECTED IN T»C OLVU-E UPON 
COMPLETION OF THIS TEST. 



R0050 
R0070 
ROllO 
R013S 
ROISO 
ROSOO 
R0600 
R0200 
RIBOO 
R2000 
112400 
RS600 



R7200 
R9600 
RIOOOO 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 



010 
030 
050 
070 
110 
130 
ISO 
170 
210 
230 
290 
270 
310 
330 
550 
570 



BAUD OFFSET INTO TABLE 

50 0 

70 1 

110 2 

155 5 

150 4 

300 5 

600 6 

1200 7 

1800 10 

2000 11 

2400 12 

3600 13 

4B00 14 

7200 IS 

9600 16 

19200 17 



riAIfCCC-ZZ CVOVA 0 riACrii 50A(10^) 12 JUL M 09:52 PAG£ 82 

CVOVHO.PVl 12 JUL M 05:04 T52 P«H)GAA»VMeLE 8*U0 «*TE TEST 

Si20 007210 040502 042125 051040 BMJORATE: .ASCIZ /BAUD RATE OION' T CHANCE./ 

5521 007216 052101 020105 044504 

5522 007224 047104 052047 041440 

5525 0072S2 040510 04S516 027105 

5524 007240 000 

55^5 007242 .EVEN 

5526 007242 000000 000000 NEU: 0.0 

5527 007246 000000 000000 OLD: 0.0 

5525 007252 END T ST 
5S29 

SS50 
S551 



riAlfCCC 


ZZ CVOVA 0 


rKiCtii 


504(1052) 12 JI 


X-84 


09:52 PAGE 85 




Pll 


12 -JUL-84 


05*04 




TS2 


MIOGH 


MMNIIBLE BAUD RATE TEST 


5552 
















5555 
















SS54 










i*TEST 


55 


TfMHSHITTER INTEfWUPT LOGIC TEST 


5555 










1 • 




LmCALLLY THIS IS 4 SEPARATE TESTS 


5556 










1 • 




A) OOES TRANSMITTER INTERRUPT LWIC NORK 


5557 










I* 




B) AT PRIORITY OF 0 


5SS6 










I* 




C) AND aM.Y ONCE 


5559 














0) BUT NOT HITH INTERRUPT ENABLE CLEAR 


5540 












SCOPE 




SS41 


0072S2 


000004 






TST55: 




5542 


007254 


012767 


000010 


171676 




nov 


•lO.ITINES iiDO 10 ITERATIONS 


5545 


007262 


012767 


000055 


171710 




nov 


•55.ITESTN itSET TEST NUr«ER IN APT NAIL BOX 


5544 














iCLEAR 'INTERRUPT QCCURtO tlAG 


5545 


007270 












LET INTFLAG :- #0 


5546 


007270 


005067 


002544 






CLR 


INTFLAG 


5547 
















5548 














iGET VECTOR ADDRESS 


5549 


007274 












LET R5 :- OLVEC 


5550 


007274 


016705 


171756 






nov 


0LVEC.R5 


5551 














iFOR T« TRANSMITTER 


5552 


007500 












LET R5 :- R5 * M 


5J55 


007500 


062705 


000004 






AOO 


M.R5 


5554 














tSET VECTOR TO POIN^ TO TR/MS.SRV 


5555 


007504 












SETVEC R5. MNTSRV. «PR7 


5556 


007504 


010146 








NOV 


Rl.-(SP) 


5557 


007506 


010501 








NOV 


R5.R1 


555a 


007510 


012721 


012052 






NOV 


•INTSRV.(Rl)* 


5559 


007514 


012711 


000540 






NOV 


•PR7.(R1) 


5560 


007S20 


012601 








NOV 


(SP)*.R1 


5561 


007522 












BGNSUB 


5562 


007522 


012767 


007550 


171560 




NOV 


«64I.ILPCRR 


5565 














i CLEAR INTERRUPT ENABLE 


5564 


007550 












LET STCSR :- STCSR CLR. BY •XNITIE 


5565 


007550 


042777 


000100 


171726 




BIC 


•xniTIE.BTCSR 


5566 
















5567 














jSET it TO 0 


5566 


007556 


012746 


000000 






NOV 


•PRO.-(SP) iiPUT NEU PS ON STACK 


5569 


007542 


012746 


007550 






NOV 


•651. -(SP) itPUTNEUPCON STACK 


5570 


007546 


000002 








RTI 


tiPOP NEU PC AM) PS 


5571 


007550 








65t: 






5572 
















5575 














>NOU SET I.E. SIT 


5574 


007550 












LET STCSR :- BTCSR SET.BY tXNITIE 


5575 


0C7550 


052777 


000100 


171706 




BIS 


•XNITIE.BTCSR 


5576 
















5577 














iLFT INTERRUPT HAVE TIME TO OCCUR 


557S 


007556 












UAITMS 1024. 


5579 


007556 


010546 








NOV 


R5.-(SP) 


5580 


007560 


012745 


002000 






NOV 


♦1024.. -(R5) 


5581 


007564 


004767 


002562 






JSR 


PC.MAIT 


5562 


007570 


012605 








NOV 


(SP)*.R5 


5585 
















5584 














lOIO EXACTLY 1 INTERRUPT OCCUR 


5585 


007572 












IF INTFLAG NE #1 THEN 


5586 


007572 


026727 


002442 


000001 




CHP 


INTFLAG. #1 


5587 


007400 


001406 








BEQ 


1154 



miI»«CC-ZZ-CvOV/l-0 rWCTii 
CVOVAO.Pll 12-ML 84 05:04 



50A(10S2) 12 
T55 



JUL-64 09:52 PAGE 64 

TRANSniTTER INTERRUPT LOGIC TEST 



SEO 62 



S366 
















tNO - WAS IT 0 OR MORE THAN ONCE 


5369 


007402 














IF INTFLAG EO •O THEN 


SS90 


007402 


005767 


002432 






TST 


INTFL«G 




5391 


007406 


001002 








BNE 


1155 


, TRANSMITTER DID NOT INTERRUPT IN TIMF 


3392 
















3393 


007410 














ERRHRO 106..0ION3T 


3594 


007410 


104106 








ERROR 


106 




5595 


007412 












1156 


ELSE 


3596 


007412 


000401 








BR 




5597 


007414 








1155: 








3396 
















1 TUICE 


3399 
















{TRANSMITTER INTERRUPTED TUICE 


3400 


007414 














ERR»«0 107.. TUICE 


3401 


007414 


104107 








ERROR 


107 




3402 


007416 














ENOIF 


5405 


007416 








1156: 








5404 


007416 














ENOIF 


3405 


007416 








1154: 








5406 


007416 














ENOSUB 


5407 














1 INTERRUPT UITHOUT INTERRUPT ENABLE SET 


5406 


007416 














BGNSUB 


5409 


007416 


012767 


007424 


171464 




MOV 


#64|, ILPcRR 




5410 
















{CLEAR 'INTERRUPT OCCUREO' FLAG 


5411 


007424 














LET INTFLAG :- #0 


5412 


007424 


005067 


002410 






CLR 


INTFLAG 




5415 
















1 CLEAR INTERRUPT ENABLE 


5414 


007450 














LET 0TCSR 8TCSR CLR. BY •XMITIE 


5415 


007450 


042777 


000100 


171626 




BIC 


•XNITIE.8TCSR 




5416 
















|N0 INTERRUPTS SHOULD OCCUR. 


5417 


007436 


012746 


000000 






MOV 


6PH0, -iSP) 


1 |PUT NEU PS ON STACK 


5416 


007442 


012746 


007450 






NOV 


#651. '(SP) 


1 |PUT NEU PC ON STACK 


5419 


007446 


000002 








RTI 




1 |POP NEU PC AND PS 


M20 


007450 








651: 








5421 
















lOARE IT TO HAPPEN 


5422 


007450 














UAITMS 2 


5425 


007450 


010546 








MOV 


R5.-(SP) 




5424 


007452 


012745 


000002 






NOV 


#2.-CR5) 




5425 


007456 


004767 


002270 






JSR 


PC.UAIT 




5426 


007462 


012605 








NOV 


(SP)*.R5 




5427 


007464 














IF INTFLAG NE M THEN 


5426 


007464 


005767 


002350 






TST 


INTFLAG 




5429 


007470 


001401 








BEQ 


•157 




5450 
















(INTERRUPT OCCUREO UITH I E CLEARED 


5451 


007472 














ERRMV) IIO.NOTENAB 


5432 


007472 


104110 








ERROR 


110 




3433 


007474 














ENOIF 


5454 


007474 








• 157: 








5435 


007474 














BRESET 


5436 


007474 


000005 








»»ESET 






5437 


007476 














ENOSUB 


5438 
















{RESTORE VECTOR AREA 


5459 


007476 














LET R4 MLVEC 


5440 


007476 


017704 


171554 






MOV 


a)LVEC.R4 




5441 


007502 














CLRVEC R4 


5442 


007502 


010146 








MOV 


Rl.-(SP) 


1 iPUSH Rl ON STACK 


5443 


fO7504 


010246 








MOV 


R2.-(SP) 


1 iPUSH R2 ON STACK 



nAIWCC-ZZ-CVOVA O nACYll 50A(1CS2) 12- JUL 84 09:52 PAGE 85 

CVOVAO.Pll 12- JUL -84 05:04 T33 TRANSMITTER INTERRUPT LOGIC TEST 



SEQ 85 



5444 
5445 
5446 
5447 
5448 
5449 
5450 
5451 
5452 
5453 
5454 
5455 
3456 
5457 



007506 012701 000004 

007512 010102 

007514 062702 000002 

007520 010221 

007S22 005011 

007524 012602 

007526 012601 
00 7350 



NOV 

«ov 

AOO 

MOV 
CLR 
HOV 

nov 



•R4,R1 

R1.R2 
•2.R2 

R2.(R1)» 
(Rl) 

(SP).,R2 
(SP)*.Rl 



llPOP STACK INTO R2 
1 1 POP STACK INTO Rl 
ENOTST 



flAINOeC -ZZ-C VOVA-D 



NACYll 30A(1052) 12 



CVOVAO.PU 



12-JUL-84 05:04 



TSS 



-JUL-S4 09:S2 PUGE 86 

TIMNSHXTTER INTEMlFT LOGIC TEST 



SEQ 84 



5456 








5459 








5460 








5461 








5462 








5465 








5464 








5465 


007550 


000004 




3466 


007552 


012767 


000010 


5467 


007540 


012767 


000054 


5466 








5469 








5470 


007546 






5471 


007546 


010146 




5472 


007550 


016701 


171502 


5475 


007554 


012721 


012052 


M74 


007560 


012711 


000540 


5475 


007564 


012601 




5476 








5477 


007566 






5476 


007566 


012767 


007574 


5479 


007574 






5460 


007574 


005067 


002240 


5461 








5462 


007600 






5465 


007600 


052777 


000004 


5464 








5465 


007606 






5466 


007606 


042777 


000100 


5467 








5466 








546*^ 


007614 


012746 


000000 


5490 


007620 


012746 


007626 


5491 


007624 


000002 




5492 


007626 






5493 








3494 








5495 


007626 






5496 


007626 


105077 


171456 


5497 








5496 








3499 








5500 


007632 






5501 


007632 


010546 




5502 


007654 


012745 


177777 


5505 


007640 


016745 


171414 


5504 


007644 


012745 


000200 


5505 


007650 


012745 


001000 


5506 


007654 


004767 


001614 


5507 


007660 


012605 




5506 








5509 


007662 






5510 


007662 


052777 


000100 


3511 








5512 


007670 






3513 


007670 


010546 





171420 
171452 



t*TEST 54 

!• 

I* 

TST54: SCOPE 
MOV 
NOV 



NOV 
NOV 
NOV 
NOV 
NOV 



171514 



171456 



171444 



651: 



171370 



NOV 

an 



BIS 



BIC 



NOV 
NOV 
RTI 



CLM 



NOV 
NOV 
NOV 
NOV 
NOV 
JSR 
NOV 



BIS 



NOV 



RECEIVER INTERRUPT LXIC TEST 
THIS TEST COVERS M.L OF THE RECEIVER 
SIDE OF T»C INTERRUPT LOGIC. BOTH DATASET 
MO CHARACTER NODES. 



•lO.ITIMES iiOO 10 ITERATIONS 

•34.ITESTN iiSET TEST NUMBER IN APT HAIL BOX 

• aEAR INTERRUPT OCCURED FLAG 
tSET UP RECEIVER INTER. VECTOR 
SETVEC DLVEC.*INTSRV.«PR7 

Rl.-(SP) 

DLVEC.Rl 

•INTSRV.(Rl)* 

•PR7.(R1) 

(SP)*.R1 

{PRIORITY 0 AND NULTIPLE INTERRUPT TEST.-RCVRIE 

BGNSUB 



•64I.ILPERR 
INTFLAG 



•NAINT.8TCSR 



•RCVRIE.mCSR 



•PRO.-(SP) 
•65t.-(SP) 



8TBUF 



R5.-(SP) 

#SET.-(R5) 

RCSR.-(R5) 

«RCVR00NE.'(R5) 

•1000. •(R5) 

PC, TIMER 

(SP)«.RS 



«RCVRIE.«)CSR 



R5.-(SP) 



LET INTFLAG :- 90 

I SET HAINT. BIT 
LET BTCSR :- 8TCSR SET. BY CNAINT 

I aEAR INTERRUPTS 
LET WCSR :- BRCSR aR.BY CRCVRIE 

(CHANGE PRIORITY 

I.. TO 0 
I iPUT NEU PS ON STACK 
I iPUT NEU PC ON STACK 
ttPOP NEU PC AND PS 



I SEND 
LET 8TBUF 



A CHARACTER 
:B- 90 



lUAIT A MAXINUH 
lOr 1000 NSEC FOR 
iRCVR RDY TO SET IN RCSR 
CALL TIMER IN < #1000. •RCVROONE. RCSR. ♦S»"T 



(SET INTERRUPT ENABLE 
LET BRCSR :- SRCSR SET. BY «RCVRIE 

iLET IT COME IN. 
UAITMS 1 



NAi»occ-zz-cvoyA-o 



CVOVAO 


Pll 


12-JUL-64 


05:04 


3514 


007672 


012745 


000001 




007676 


004767 


002050 


S516 


007702 


012605 




3517 


007704 






3518 


007704 


017700 


171552 


3519 








3520 








3521 


007710 






3522 


007710 


026727 


002124 


3523 


007716 


001406 




352* 








5525 


007720 






3526 


00^720 


005767 


002114 


3527 


007724 


001002 




3526 








5529 


007726 






ssso 


007726 


104111 




35S1 








3552 


007750 






3555 


007750 


000401 




3554 


007752 






5555 








5556 


007752 






5557 


007752 


104112 




5556 


007754 






5559 


007754 






5540 


007754 






5541 


007734 






5542 








5545 


007754 






5544 


007754 


042777 


000004 


5545 








5546 


007742 






5547 


007742 


042777 


000100 


5546 


007750 






5549 








5550 








5551 








5552 








5555 








5554 








5555 








5Sj6 








5557 


007750 






5556 


007750 


012767 


007756 


5559 


007756 






5560 


007756 


052767 


020000 


5561 


007764 


001004 




5562 








5565 


007766 






5564 


007766 


012767 


000001 


5565 


007774 


000466 




5566 


007776 






5567 


0077V6 






5566 








5569 


007776 
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T54 RECEIVER INTERRUPT LOGIC TEST 



000001 



MOV 
JSR 

nov 
nov 



CMP 
BEQ 



TST 



• 161: 

•162: 

• 160: 



BR 



171522 
171510 



SIC 
SIC 



171152 
171254 

171164 



nov 

BIT 



NOV 
BR 



•165: 



#1,-(R5) 

PC.UAIT 
(SP)».R5 

aPBUF.RO 



INTFLA6.#1 
• 160 



INTFLAG 
•161 



ERROR ill 



• 162 



ERROR 112 



M1AINT.8TCSR 
MCVRIE.atCSR 



LET RO :- MBUF : CLEAR RCVROONE 



lOID HE 00 IT RIGHT? 
IF INTFLAG NE •! THEN 



iNONE OCCUREO 

IF INTFLAG EQ «0 THEN 



iRECEIVER DID NOT INTERRUPT IN TIME 
ERRHRO 111..0IONOT 

t TWICE OR MORE 
ELSE 



{RECEIVER INTERRUPTED TWICE 
ERRHRO 112.. TWICE 

ElOIF 

EfOIF 

;RESEr HAINT. BIT. 
LET 8TCSR :- STCSR CLR.BY «miNT 

I CLEAR INTERRUPT ENABLE 
LET 8RCSR :- BRCSR CLR.BY «RCVRIE 

EM)SUB 



iPRIORITY 0 AND MULTIPLE INTERRUPT TEST.-DATAIE 

BGNSUB 



•64>.^LPERR 

•CABLE. tUSUR 
• 163 



•1, •TIMES 
TST 55 



IF KABLE NOTSETIN •USUR THEN 



I CAN'T TEST WITHOUT A CABLE 
EXIT TST 



IJlEXIT THIS TEST 
ENDIF 



I CLEAR TNTFLAG' 
LET INTFLAG :• 90 



riAl»cec 


-ZZ-CVOVA-0 


MACYll 


CVOVAO. 




IP- JUL -64 


05:04 


5570 




005067 


002036 


S571 








5572 


010002 






5575 




042777 


000040 


5574 








S575 








5576 




012746 


000000 


5577 




012746 

VXK • ^ V 


010022 


5576 




000002 




5579 


010022 






5SA0 








5561 




042777 


000004 


5562 








55A5 








5564 




0^777 


000040 


5565 


010036 






5566 




0^777 


000004 


5567 








5566 








5569 




010546 




5590 


010046 


012745 

VXC * ^ J 


000001 


5591 


010052 


004767 


001674 


5592 


010056 


012605 




5595 








5594 








3595 


010060 






5596 


010060 


026727 


001754 


5597 




001406 




5596 








3599 








5600 




005767 


001744 


3601 


O1O074 


O01O02 




5602 








5603 


010076 

VXW > V 






3604 


010076 


104113 
x%^vxx^ 




3605 








3606 


0101 AO 

VX VXvV 






3607 


010100 


AAOAOl 




5606 


OlOlOP 

VXVXVK 






3609 








3610 


oloiod 






3611 


010102 


104114 

X^^'XX^ 




3612 


010104 






3613 


010104 






3614 


0101O4 
wx vx%^^ 






3615 


010104 

vx vx%^^ 






3616 


010104 

VX wX^^^ 






3617 


01O1O4 

wx vx\^^ 


042777 


000040 


3616 


010112 

vx vx xc 






3619 


010112 


042777 


000004 


3620 


010120 

VX vxcv 






3621 








3622 


010120 






3623 


010120 


017704 


171132 


3624 


010124 






3625 


010124 


010146 





T34 



64t: 



RECEIVER INTERRUPT LOGIC 
CLR INTFLAG 



eiC COATAIE.aRCSR 



NOV «PRO.-(SP) 
NOV «64t,-(SP) 
RTI 



BIC MEQSEND.OTCSR 

BIS •DATAIE.8RCSR 
BIS MEQSENO.WCSR 



NOV R5.-(SP) 

NOV #1.-(R5) 

JSR PC.UAIT 

NOV (SP)*.R5 



CMP INTFLAG.61 
BEQ 1164 



TST 



1165: 

1166: 
1164: 



BR 



INTFLAG 
<165 



ERROR 113 



1166 



ERROR 114 



BIC •OATAIE.0(CSR 

BIC MEQSEND.WCSR 

NOV a)LVEC.R4 

MOV Rl.-CSP) 



SEQ 86 



TEST 



I CLEAR INTERRUPTS 
LET BRCSR :" ORCSR CLR.BV 40ATAIE 

•CHANGE PRIORITY 

I.. TO 0 
1 1 PUT NEU PS ON STACK 
llPUT NEU PC ON STACK 
itPOP NEU PC AND PS 

LET WCSR :- 0)CSR CLR. BY ««(EQSEIC 

I SET INTERRUPT ENABLE 
LET WCSR :- WCSR SET. BY 40ATAIE 

LET OTCSR :- tftCSR SET.5Y •REQSEND 

(LET IT CONE IN. 
UAITNS 1 



t DID IT DO IT RIGHT? 
IF INTFLAG NE •! T»CN 

iNONE OCCURED 

IF INTFLAG EQ #0 THEN 

iDATAINT DID NOT INTERRUPT IN TIME 
ERRHRD 113..DIDN0T 

iTUICE OR MORE 
ELSE 

I DATAINT INTERRUPTED TUICE 
ERRMRO 114.. TUICE 

ENDIF 

ENOIF 

LET WCSR 8RCSR CLR. BY •OATAIE 
LET 8RCSR RRCSR CLR. BY •REQSEND 
ENOSUB 

LET R4 :- SDLVEC 

CLRVEC R4 
<tPUSH Rl ON STACK 
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CVOVAO.Pll 12-JUL -64 05:04 TS4 RECEIVER INTERRUPT LOGIC TEST 



SEQ 67 



3626 010126 010246 

3627 010150 012701 000004 
3620 0101S4 010102 

3629 010136 062702 000002 

3630 010142 010221 

3631 010144 005011 

3632 010146 012602 

3633 010150 012601 

3634 010152 



nov 

NOV 
AOO 

nov 

CLR 
NOV 
NOV 



R2.-(SP) 

•R4,R1 

R1.R2 

#2.R2 

R2.(R1)* 

(Rl) 

(SP}*.R2 
(SP)*.Rl 



) (PUSH R2 ON STACK 



i {POP STACK INTO R2 
1 1 POP STACK INTO Rl 
ENDTST 



liAIHOEC-ZZ CVOVAO MACYll 30A(1052) i2-JUL-S4 09:52 PAGE 90 

CVOVAO.PU 12-J>X-84 05:04 TS4 RECEIVER INTERRUPT LOGIC TEST 



SEQ 66 



36 SS 








5636 








3657 








5656 








5639 








5640 


010152 


000004 




5641 


010154 


A* ^ 

012767 


000001 


5642 


010162 




000035 


5645 








5644 


010170 






5645 


010170 


05« 777 


AAAAAd 

000004 


5646 








3647 








5648 








5649 


010176 


A« ^^^^ 

012746 


AAAAAA 

000000 


56S0 


010202 


012746 


At A^4 A 

010210 


5651 


010206 


AAAAA'^ 

000002 




5652 


Afl A'^fl A 

010210 






5659 










A« A 

010210 






5655 


Afl A^« A 

010210 


162705 


AAAAA9 

000002 


5656 


A4 A'%< A 

010214 


AAA ^ 

004767 


AA4 ^ 

001492 


3657 


010Z2Q 


Ai ""If fkl 

012501 




3656 








3659 


A« A^^^ 

010222 






3660 


A« A^^^ 

010222 


At TTAA 

017700 


4 74 AV^ 

171034 


3661 








3662 








3663 


010226 






3664 


010226 


AACAA'^ 

005002 




3665 


010250 


AAA^ AV 

000401 




3666 


010252 






3667 


A« A'^V^ 

010252 


AAflf AA1 

005202 




3666 


A6 A'kV^ 

010234 






3669 


Afl AHV A 

010254 


020227 


AAAV 

000377 


3670 


A 4 A'^A A 

010240 


AA VAA ^ 

003047 




3671 








■XT') 

3672 








3673 








3674 








3675 








3e 'o 




010546 




30' f 


Aa A^^ A 

O 10244 


012745 


177777 


3orB 


O 10250 


016745 


9 "^4 A« A 

171010 


3679 


010254 


012745 


AAA^^AA 

000200 


3660 


010260 


012745 


AA« AAA 

001000 


3661 






AA4 ^^KM 

001204 


3662 


010270 


At "Xt Af 

012605 




9eB3 








3604 








3665 


Al A^7'9 

010272 






JOOC 




1 1 ft377 

1 1 VC 1 1 


1 7ft ■'73 


5667 








5666 


010276 






5669 


010276 


010546 




5690 


010500 


012745 


mm 



170776 
171010 



171066 



1 1 •••••••«*•••*•••*••••••••••**•**••***•*•*••***•••••••*•**•**•** 

UtEST 55 TEST ACTUM. DATA TRANSFEREO 

I* NON-INTERRUPT MAINTENANCE BIT SET 

TST35: SCOPE 

nov •i.iTircs mDO i iteration 

NOV tSS.ITESTN i i SET TEST NUI«ER IN APT NAIL BOX 

iSET NAINT. BIT 
LET 8TCSR :- 8TCSR SET. BY CNAINT 

BIS «NAINT.8TCSR 



64»: 



♦ 170: 
1167: 



NOV tPRO.-CSP) 
NOV «64t.-(SP) 
RTI 



SUB #1*2.RS 

JSR PC.0ATLN6 
NOV (R5)*.R1 



NOV WBUF.RO 



CLR R2 

BR »167 

INC R2 

CMP R2.*S77 

BGT 1171 



NOV R5.-(SP) 

NOV #S£T,-(R5) 

NOV TCSR.-(R5) 

NOV *XHITR0Y..(R5) 

NOV nOOO.-CRS) 

JSR PC.TINER 

NOV (SP)*.R5 



NOVB R2.aTBUF 



NOV R5.-(SP) 
MOV •SET.-CRS) 



I CHANGE PRIORITr 

I.. TO 0 
I (PUT NEW PS ON STACK 
I (PUT NEW PC ON STACK 
; iPOP NEW PC AND PS 

I GET OATA MASK. 
CALL OATLNG OUT <R1> 



I START CLEAN 
LET RO :- «BUF 



{ALL BINARY CHAR. 
INCR R2 FROM M TO •377 BY 01 



t TRANSMIT CHAR IN R2 

CALL TIMER IN <*1000.*XMITRDY .TCSR.#SET> 



{TRANSMIT IT 
LET 8TBUF :B- R2 



CALL TIMER IN <*1000.«RCVROONE.RCSR.#SET> 



nAINOCC-ZZ-CVOVA 0 



CVOVAO 


Fll 


12 JUL -64 


5691 


010304 


016745 


3692 


010310 


012745 


5693 


010514 


012745 


5694 


010S20 


004767 


3695 


010S24 


012605 


5696 






3697 


010326 




3696 


010326 


017703 


3699 






3700 






3701 






3702 






3703 






3704 






5705 


010332 




3706 


010332 


010204 


5707 


010334 


040104 


3706 


010336 




5709 


010556 


040103 


5710 






5711 






5712 


010340 




5715 


010540 


020403 


3714 


010542 


001405 


3715 






3716 


010544 




3717 


010544 


104116 


3716 


010546 




3719 


010546 


012767 


3720 


010554 


000404 


5721 


010556 




3722 


010556 




3725 


010356 




5724 


010556 


000725 


5725 


010360 




5726 






5727 






5726 


010360 




3729 


010560 


042777 


3730 


010366 




3731 






3732 






3733 







riACril 30A(1052) 12 
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170750 
000200 
001000 
001150 



170750 



JUL-64 09:52 PAGE 91 

TEST ACTUAL 3ATA TRAN5FERE0 



S£Q 69 



NOV 
NOV 
NOV 
JSR 
NOV 



NOV 



NOV 
BIC 

eic 



Ct*> 
BEQ 



•172: 
1171: 



RCSI».-(R5) 
«RCVM)0NE.-(R5) 
•1000. -(R5) 
PC.TINER 
(SP)».R5 



.R5 



R2.R4 
R1.R4 

R1.R3 



R4.R5 
tl72 



iANO SAVE IT 
LET R3 :- BRBUF 



t COMPARE TO SEE IF VE RECEIVED IT ALL 

taEAN OFF NON-DATA BITS 
iON BOTH TRANSNITTED AND 
LET R4 :- R2 aR.BY Rl 



LET R3 :- R5 CLR.BY Rl 



(RECEIVED DATA 
IF R4 NE R5 THEN 



ERROR 116 

NOV •I.ITIMES 
BR TST56 



BR 1170 



BIC CNAINT.aTCSR 



tOATA CO»«>ARE ERROR 
ERRHRO 116.C0NP.SBtMS 

EXIT TST I ON ERROR 



lilEXIT THIS TEST 
ENDIF 

ENDINC t R2 



iRESET NAINT. BIT. 
LET 8TCSR :- 8TCSR CLR.BY CNAINT 



ENDTST 



nAINOeC 


7Z CVOVA 0 


fiACrii 


CVOVAO. 


oil 


1 o > ■ .AA 

Lc - »AJt -O* 


05:04 


•3 ' 3* 








3 r 93 








9 1 SO 








»7V7 








3/ JO 


OlOSoO 








/\t AV7A 
0109 'O 


At 07^7 
Ulc rO r 


000001 




0109 ro 


At ^7iL7 


OOOOSft 


V7A 1 


oiw*v* 








OlOW* 


U3c f O f 


020000 


3 


At AA 1 O 

01O412 


M^t 




3 








3 f * J 


At t A 
OlO^l* 






3 r*0 


At 1 A 


A 1 3 7<l 7 
OIc re ' 


OOOOOl 


3 » 


At 


OUW* 




3 r ^O 


At AA 








At AA^A 






3 f JV 








3 ' 


A1 ^^^A 






3 r 3C 


At AA^A 


III 


ooooo* 


3 '93 








X7^ 










At AAV3 


A1 37AiL 
OlC '40 


000000 


3 ' 90 


At AA 


Oli f*0 




3 '3 f 


OlOO^« 






J • JO 


At AAAA 

oiuoo# 






J • J » 








J rOV 


At nAAA 






J rOA 


At AAA^ 

oioo«# 


lOC iVJ 




J '^pC 


A1 ^^^A 

wlU*3U 


WW f O ' 


001176 


J f w J 


At t^KA 


A1 3<A1 




J 


At AA^^ 






J f w J 


At ^Mm^ 
OlO* JO 


At 77^A 
Ol ' rOO 


170600 


J r vO 










At 






J » WW 


A1 AA^O 


OOSOOtf 




J r07 


At AJtf M 


^^^AAt 

OWWl 




1770 

J f r V 


At £ 






^771 


A 1 A^^ € 
010400 


/WMt^AO 

0V320e 




577? 


At AA7A 






5771 

J r f J 


At AA7A 


A^A007 


000^77 


177A 


At AA7A 
OlO* f • 


00304 r 




577S 








5776 

J r rO 








5777 

J r f f 








57711 

J r ■ O 








5774 


At AA7A 
UlU* 'O 






57AO 


A1 AA7& 
UIW 'O 


At O/LAA. 




5781 

J ' wl 


At AA^^ 
OIvjOv 


A1 OIA^ 
Olc '43 


177777 


57A7 

O r OC 


At AftAA 


At A7AC 

OlO '•D 




57115 

J ■ O J 


A1 AXI A 


A1 37A^ 
Olc '•j 


ooo>oo 


57M 

9 'O^ 


Al A<(1 A 


A1 37A^ 
vie 


OOlOOO 


57M 

J • w J 


vlv3CV 


WW 'O ' 


000 TV 


57M 


A1 


A1 3iU>4 




57117 

J » O ' 








97M 








5789 


010526 
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T35 TEST ACTUAL DATA TRANSFEREO 



SEQ 90 



170562 
170574 

170606 



170536 



170652 



i 

i*TEST 36 

TST36! 



1173: 



641: 



• 175: 

• 174: 



SCOPE 
HOV 
NOV 

BIT 



riov 



eic 



NOV 
NOV 
RTI 



SUB 
JSR 
NOV 

NOV 



CLR 

INC 

CMP 
BGT 



NOV 
NOV 
NOV 
NOV 
NOV 
JSR 
NOV 



TEST DATA THROUGH CABLE 



•i.^Tircs 

•36.^TESTN 

•CMLE.^USUR 
• 173 



•i.^rircs 

TST37 



«NAINT.8TCSR 



«PR0.-(SP) 
«64^.-(SP) 



•1*2. RS 

PC.OATLNG 
(R5)*.R1 



• RO 



R2 

• 174 

R2 

R2.#377 

• 176 



R5.-(SP) 

♦SET.-(R5) 

TCSR.-(R5) 

#XNITR0Y,-(R5) 

•1000. -(R5) 

PC.TINER 

(SP)*.R5 



itOO 1 ITERATION 

it SET TEST NUr«ER IN APT NAIL BOX 

IF KABLE NOTSETIN •USUR T»€N 



iCAN'T TEST JITHOUT ^ CABLE 
EXIT TST 



iiiEXIT THIS TEST 
ENDIF 



iDON'T USE NAINT. 
LET 8TCSR 8TCSR CLR.BY fNAINT 

tC»MNGE PRIORITY 
I.. TO 0 



t tPUT NEU PS ON STACK 
{ tPUT NEU PC ON STACK 
t tPOP NEU PC AND PS 



tCET DATA NASK 
CALL DATLNG OUT <R1> 



LET RO :■ SPOUF : START CLEAN 

{BINARY COUNT PATTERN 
INCR R2 FROri #0 TO •377 BY •I 



t TRANSMIT THE CHAR. IN R2. 

CALL TIMER IN <^1000.^XMITR0Y. TCSR.^SET> 



(START IT ON ITS UAt 
• "T 8TBUF :B> R2 



1AH«£C ZZ-CVOVA 0 MACYll B0A(10S2) 12-JUL-84 09:52 PAGE 93 

.VOVAO.Pll 12 JUL 84 05:04 T36 TEST DAT* THROUGH CABLE 



3790 

5791 

5792 

5795 

5794 

5795 

5796 

5797 

3798 

5799 

5600 

5601 

3602 

5605 

5604 

5605 

5606 

3607 

5606 

3609 

3610 

5611 

3612 

3613 

3614 

3615 

3616 

3617 

3616 

3619 

3620 

5621 

5622 

5623 

5624 

3625 

3626 

5627 

3626 

3629 

3630 

3631 

36S2 

3633 

3634 



010526 
010532 
010532 
010534 
010540 
010544 
010550 
010554 
010560 



010562 
010562 



010566 
010566 
010570 
010572 
010572 



010574 
010574 
010576 

010600 
010600 
010602 
010602 
010610 
010612 
010612 

010612 
010612 
010614 



010614 



110277 170536 



010546 
012745 
016745 
012745 
012745 
004767 
012605 



177777 
170514 
0002C0 
001000 
000714 



017705 170474 



010204 
040104 



040103 



020403 
001405 



HOve 

nov 
nov 
nov 
nov 
nov 

JSR 

nov 



nov 



nov 

BIC 
BIC 



cnp 

BEQ 



104117 

012767 000001 170350 
000401 



000725 



• 177: 



»176: 



nov 

BR 



BR 



R2.STBUF 

R5.-(SP) 

♦SET.-(R5) 

RCSR.-(R5) 

•RCVR00NE.-(R5) 

♦1000. -(R5) 

PC.TinER 

(SP)».R5 



.R3 



R2.R4 
R1.R4 

R1.R3 



R4,RS 
•177 



ERROR 117 



•1, Hires 

TST37 



•175 



SEQ 91 

CALL TinER IN <*1000.«RCVR00NE.RCSR.*SET> 



I RETRIEVE 
LET R3 :• 



I STRIP OFF JUNK ON BOTH 
LET R4 :- R2 CLR.BY Rl 



LET R3 :- R3 CLR.BY Rl 



iUE HAVE TROUBLE 
IF R4 NE R3 THEN 



:OATA COnPARE ERROR 
ERRMRD 117.C0nP.SBUAS 



EXIT TST : ON ERROR 



J EXIT THIS TEST 
ENOIF 



ENOINC s R2 



ENOTST 



riAIICCC ZZ CVOVA 0 MACth W(10S2) 12-JUL -S4 09:52 PACE 94 

CVOVAO.PU 12 JUL S4 05:04 TS6 TEST DATA T»«OUGH CMLE 



SEQ 9c 



MSS 
5637 

sasa 

S85<» 
S«40 
5«41 

5«4S 
5644 
5645 
5646 
5647 
5648 
3649 
5650 
S6S1 
3652 
5655 
5654 
5655 
5656 
5«7 
S656 
5659 
5660 
5661 
5662 
5663 
5664 
5665 
5666 
5667 



5669 
S670 
5671 
5672 
5675 
5674 
5675 
5676 
5677 
5676 
5679 



5661 



SMS 



3665 
5666 
5667 
5666 
5669 
5690 



010614 
010616 
010624 



010632 
010652 
010640 
010642 
010642 
010650 
010652 
010652 

010652 
010652 
010656 
010662 



010664 
010670 
010674 
010676 

010676 
010676 

010702 
010702 
010706 
010706 



010712 
010712 
010716 



000004 

012767 000001 170554 
012767 000037 170546 



052767 000001 170354 
001404 

012767 000001 170310 
000550 



162705 000002 
004767 000770 
012505 



; I ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 

!*TEST S7 FULL DATA TNANSFER KITH INTCIMUPTS 

t* AM) NAINTEIMNCC MODE. 

TSTS7: SCOPE 

HOV •l.lTirCS iiOO 1 ZTEKATION 

HOV #S7.tTESTN nSET TEST NUTVER IN APT HAZL BOX 



1200: 



BIT 
BEQ 

HOV 
Bft 



sue 

JSP 

nov 



012746 000000 
012746 010676 
000002 



016701 170554 

012721 011076 

012721 000540 

012721 011054 



641: 



nov 
nov 

BTI 



nov 

nov 
nov 

nov 



t THIS TEST I<; 'BREAK OP HALT' SINSATIVE. 



IF MPTENV SET IN tENV THEN 



EXIT TEST 

iiiEXIT THIS TEST 
ENDIF 

iGET OATft hASK 
CALL DATLNG OUT <P5> 



•APTENV.tENV 

1200 

•l.tTIHES 
TST40 



#1*2.R5 

PC. DATLNG 
(R5)».R3 



THIS TEST yiLL RUN BOTH TRANSHITTER AND 

RCCIEVER AT FULL SPEED TESTING 

T»C ABILITY OF THE HOOULE 

TO HANDLE INTERRUPTS FROH BOTH SIDES 

AT ONCE. ALSO. THE 30UBLE BUFFERING LOGIC 

OF T»C UART yiLL BE FULLY TESTED. 

THIS TEST MILL TRANSFER A NAXINUH OF 400(8) 
CHARACTERS THROUGH T»C NOOULE. BUT IF Ml ERROR 
IS DETECTED BY THE TEST A PREMATURE SHUTDONN OCCURS. 



•PRO.-(SP) 
•641. -(SP) 



DLVEC.Rl 

•REC.(Rl)* 
•PR7.(R1). 

•TRAN.(R1)< 



iCHANGC PRIORITY 

I.. TO 0 
I iPOT NEW PS ON STACK 
I iPUT NEy PC ON STACK 
itPOP NEy PC AM) PS 

iGET VECTOR ADDRESS 
LET Rl DLVEC 

iRCVR VECTOR 
LET (Rl). MEC 

LET (Rl). :- iPRT 

iPOINT TO TRANSMITTER VECTOR 
lAND SET IT UP ALSO 
LET (RD* :> tTRAN 



LET (Rl> 



•PR7 



nAI»OeC-7Z CVOVA 0 
CVOVAO.Pll 12 ML 6* 



5691 


010716 


0127J 1 


569^ 






5695 






5694 


010722 




5695 


010722 


012^01 


5696 






5697 


010726 




5696 


010726 


005002 


5699 






590C 


010750 




5901 


010750 


012704 


5902 






5905 






590« 


010754 




5905 


010754 


005067 


5906 






5907 


010740 




5906 


010740 


000005 


5909 






5910 


010742 




5911 


010742 


052777 


5912 






5915 






5914 


010750 




5915 


010750 


052777 


5916 






5917 


010756 




5916 


010756 


052777 


5919 






5920 






5921 






5922 


010764 




5925 


010764 




5924 


010764 




5925 


010764 


020467 


5926 


010770 


001405 


5927 


010772 


00576' 


5926 


010776 


005772 


5929 


011000 




3950 






5951 






5952 


011000 




5955 


011000 


005767 


59S4 


011004 


001401 


5955 






5956 


011006 




5957 


011006 


104120 


5956 


011010 




5959 


011010 




5940 






5941 


011010 




5942 


011010 


042777 


5945 


011016 




5944 


011016 


042777 


5945 






5946 


011024 





05:04 T57 
000540 

177777 

177777 
000066 

000004 170514 

000100 170506 
000100 170274 

1201: 

000040 
000050 

1202: 

000022 

1205: 

000100 170246 
000100 170254 



64 0<*:52 PAGE 95 

FULL DATA TRANSFER WITH 

HOV •f>«7.(Rl) 

MOV » l.Rl 

CLR R2 

flOV •-1.R4 

CLR ERRCNT 
RESET 

BIS MAINT.STCSf) 

BIS •xniTIE.STCSi* 

BIS MCVRIE.tftCSft 

CMP fM.NUrOCR 

BEQ 1202 

TST ERRCNT 

BLE 1201 

TST EPRCNT 

BCQ 1205 

ERROR 120 

BIC •xniTIE.STCSR 

BIC *xniTIE,SRCSR 



INTERRUPTS 



i INITIALIZE COUNTERS 
LET Rl :• #-1 

iRECEIVCH STORAGE 
LET R2 :• #0 

i* OF RECEIVED CHAR. COUNT, 
LET R4 :■ ••! 



t aEAR ERROR COUNT. 
LET ERRCNT :• #0 



BRESET (SET UP ALL REGISTERS 

I SET UP MAINTENANCE 
LET 8TCSR :• BTCSR SET.Bt itlAINT 



jSET I.E. IN TRANSMITTER 
LET 8TCSR :• 8TCSR SET. BY ♦XHITIE 

{AND RECEIVER 
LET 8RCSR :- 8RCSR SET.Bv •RCVRIE 



iNOU kC UAIT UNTIL R4 COUNT (RECEIVED) IS EQUAL 
REPEAT 

UNTIL R4 EQ NUTfiER OR ERRCNT GT M 



I DATA COr^ARE ERRORS. 
IF ERRCNT NE #0 THEN 

I DATA COrVARE ERROR 
ERR»«0 120. CaM>. FIRST 

EM)IF 

LET 8TCSR :> 8TCSR CLR.Bv •XHITIE 
LET SRCSR 8RCSR CLR. By •XHITIE 

EXIT I SKIP OVER SUPPORT ROUTINES £ STORAGE 



1AI»C€C Zl CVDV/^ D MACTll 
CVOVAO.Pll 12 JUL S4 05:04 



50A(1052) 12 JUL 84 09:52 PAGE 96 

T57 FULL DATA TRANSFER UITM INTERRUPTS 



594 7 


OX 102« 


ooo*o< 










01 lOA 


A/VtAAA 


3950 


All A 

oi low 




vac 1 
3951 


At 1 nxo 
Oi 103c 


MM 


395^ 


All AW 

OI 1033 




vac V 

3953 






395* 






voce 
3955 






3956 






395 ' 






3950 






3959 


All i\XA 
OI lO j4 




39bU 


Oi iO J* 




3961 




















At 1 A« J 






All nXA 


AA^SAI 
W/9cvl 








3W / 


All ASJL 






011090 


Al A1iL7 
OlOlO ' 




A1 


AAAVJ>7 
U*090 « 








3^' 1 


oiio»o 




ytf<d 


At lAAiL 


A1iL777 
OlO ' 1 1 










All 






At 1 


A3A1iL7 




A1 1 

Oil WO 


AA1 AAX 
001U09 


<077 








Af 1 






Af f 

OllOD^ 


AA3777 




All A7A 
Olio 'O 






All A7A 
OllO'O 












All A7A 

Olio rO 


A^MAAI 








lose 


Al 1 A79 

Olio n 


AAAAAA 

ouoooo 


3^no 






1t<MI7 


VI iO 






t1 1 A7A 
WHO 


MMAA9 
OWMWc 


































Al 1A7iL 
OI lO rO 






All mt^ 

OllOrO 






















J y ▼ y 


01 1076 




4000 


011076 


005204 


4001 






4002 


011100 





BR 



TRAN: 



000050 
000024 



000020 
177750 

000100 



170214 



INC 



nov 

BIC 



nov 



170174 BIC 
t204: 



ZZZ: 



NEC I 



INC 



TST40 



iilEXiT THIS TEST 



ERRCNT: 0 

NUMBER: 400 

SB: .BrTE 0 

WAS: .BrlE 0 



iTRANSniT INTERRUPT HANDLER 

BGNSRV TRAN 



Rl 



Rl.HOLO 
R3.H0L0 



H0L0.8TBUF 



Rl. NUMBER 
1204 



•XMITIE.BTCSR 



ZZZ 



i INCREMENT CHAR COUNT 
LET Rl Rl . #1 

(SET UP FOR TRANSFER 
LET HOLD :- Rl CLR.Br R5 



(AM) S£M>. 
LET 8TBUF :> HOLD 

lALL DONE 
IF Rl EQ NUIfiER T»€N 



(STOP INTERRUPT PROCESSING 

LET 8TCSR :- aTCSR CLR.BY •XMITIE 

EM>1F 

I EXIT SRV 
H0LD:O 
EWSftV 



iRECEZVER XNTCMIUPT HM0LER 

BGNSRV REC 



R4 



I COUNT THIS CHAR. 
LET R4 :> R4 * •! 

iGET CHAR IN • MASK IT 
LET R2 8R6UF ClR.BY R5 



NAI«EC -ZZ CVOVA-D 



CVOVAO 


Pll 


12-JUL -84 


4003 


011100 


017702 


4004 


711104 


040502 


4005 






4006 


011106 




4007 


011106 


010467 


4006 


011112 


040567 


4009 






4010 






4011 


011116 




4012 


011116 


020267 


4015 


011122 


001412 


4014 






4015 


011124 




4016 


011124 


005767 


4017 


011150 


001005 


4016 






4019 


0111S2 




4020 


0111S2 


116767 


4021 


011140 




4022 


011140 


110267 


4025 


011144 




4024 


011144 




4025 






4026 


011144 




4027 


011144 


005267 


4026 


011150 




4029 


011150 




4050 






4051 






4052 


011150 




4055 


011150 


020467 


4054 


011154 


001005 


4055 






4056 


011156 




4057 


011156 


042777 


4056 






4059 


011164 




■1040 


011164 




4041 






4042 






4045 


011164 


000401 


4044 






4045 


011166 


000000 


4046 


011170 




4047 


011170 




4048 


011170 


000002 


4049 






4'^50 


011172 




4051 






4052 






405! 







MACril 30A(I0S2) 12-JUL 84 09:52 PAGE 97 
05:04 T37 FULL DATA TRANSFER WITH 



•206: 



•205: 



MOV 
BIC 



MOV 
BIC 



CMP 
BEQ 



TST 
BNE 



MOVB 
nOVB 

INC 



CMP 
BNE 



BIC 



t207: 



ZZZZ: 



aRBUF.R2 
RS.R2 



R4.RHLD 
R5.RHLJ 



R2.RK.0 
•£0S 



ERRCNT 
•206 



RNLD.SB 
R2.UAS 

ERRCNT 



R4. NUMBER 
•207 



•RCVRIE.MCSR 



ZZZZ 



RTI 



S£0 95 



INTERRUPTS 



iRHLO WILL CONTAIN EXPECTED II^T 
LET RHLO :> R4 CLR BY R3 



jDO THET COMPARE 
IF R2 NE RK.0 THEN 



iFIRST ERROR 

IF ERRCNT EQ #0 THEN 



I SAVE RECORD OF FIRST MISS 
LET SB :B- RH.D 



LET UAS :B- R2 
ENDIF 



J COUNT IT. 

LET ERRCNT :- ERRCNT » «1 



ENDIF 



{ALL DONE? 
IF R4 EQ NUMBER THEN 



I STOP RECEIVER INTERRUPTS 

LET WCSR :- WCSR CLR. BY «RCVRIE 

jMAIN REPEAT LOOP IS CHECKING 
ENDIF 



iFOR 'R4 • NUMBER' ALSO 
t EXIT SRV 

RH.O:0 

ENDSRV 



ENDTST 





P1 1 


IP-JUL S4 


05:04 


























AM 7 


























01 1 1 7P 
wA A A > C 


000004 




AMI 


01 1 1 74 

wA A A 


01P767 

VAC ■ V ' 


000010 


AMk9 


Ol 1>Q9 
wA AcVC 


01P767 

VAC ' W ' 


000040 




V A AC AV 








Ol 1?10 

wAAC AV 


01P767 

V^C • V ' 


010000 




Ol 1716 
VA AC Aw 


001004 






Ol IPPO 
V A ACCV 






A/M17 


Ol 19PO 

VA ACCV 


01P767 

VAC ' V ' 




A<M>II 


Ol 1PP6 

VA ACCV 


w^^^^c 






Ol IPSO 

VA AC<M/ 






^Wt w 


Ol IPSO 

V4 AC^r 
















OllPSO 

vA AC^# 








OllPSO 

VA AC^V 


05P777 

V^C ' ' • 






















Ol IPSA 

VA AcJv 






AA77 


011PS6 

VA AC^V 


017700 


1700P0 

A ■ WC V 


4078 


























Ol 1P4P 

VA AC^C 








011P4P 

V A AC^C 


05P777 

V^C ■ ' ' 


000001 

V^n^VVA 












OllPSO 

VA AC^/ 








OllP'jO 

VA AC^^ 


01P777 

VAC • • • 


OOOP5P 




Ol 1P% 
VA AC^V 






40A7 


011PS& 
VA Ac^y 


WA V-^^v 




AOM 


OllPAO 
VA Acm/ 


V^C 


177777 




011P&4 

VA ACv^ 




167770 

A V ■ ■ ■ V 


4O90 


011P70 

VA AC * V 


VAC » ^ J 


OOOPOO 


4091 


011P74 

VA AC ■ ^ 


WAc J 


OOlOOO 




01 ISOO 

VA A^^/ 


OM7&7 


000170 

lA/VA "V 




011S04 

VAA^^ 


VAfcOvJ 




4044 


Ol 1 SO& 

VA A 






4095 


OllSOli 

VA A 


Av^WA 




4096 








4097 


OllSlO 

VA A JAV 






4098 


OllSlO 


A^^* A AW 




4099 


OllSlP 






4100 


OllSlP 

VA A«#AC 






4101 








4102 


OllSlP 

VA A «#AC 






410S 


OllSlP 

VA A*' AK 


105777 

AVW iff 


167744 

Aw » • 


4104 


011S16 

VA A^Av 


001401 




4105 








4106 


OllSPO 

VA A^kV 






4107 


011320 


104121 




4106 


011S22 






4109 


011322 







HACYll S0A(10S2) 12- JUL -64 09:52 PAGE 96 

TS7 FULL DATA TRANSFER WITH INTERRUPTS 

UtEST 40 TEST BREAK GENERATION LOGIC 

t* TRANSNIT KNOUN CHAR UITH BREAK SET 

I* AND COHPARE RECEIVED UITH 0. 

TST40: SCOPE 

167756 NOV tlO.tTIHES iiOO 10 ITERATIONS 

167770 NOV •40.tTESTN iiSET TEST NUWER IN APT MAIL BOX 

IF fBRK NOTSETIN lUSUR THEN 

170002 BIT fBRK.IUSUR 

BNE 1210 

EXIT TST 

167732 NOV *1.»TINES 

BR TST41 iiiEXIT THIS TEST 

ENDIF 

1210: 

.SET MAINTENANCE BIT 
LET 8TCSR :- 8TCSR SET. BY «t1AINT 

170026 BIS fNAINT.aTCSR 



SEQ 96 



170014 
170012 



NOV 8RBUF.ro 



BIS «eREAK.8TCSR 



NOV •2S2.8TBUF 

NOV RS.-(SP) 

NOV #SET.-(RS) 

NOV RCSR.-(R5) 

NOV «RCVR00NE.-(R5) 

NOV 41000. -CRS) 

JSR PC. TIMER 

NOV (SP)*.RS 

BCC 1211 



ERROR 115 



t CLEAR RCVRDOrC JUST IN CASE 
LET RO :- tftBUF 



iSCT BREAK BIT 
LET 8TCSR 8TCSR SET. BY 4BREAK 

iNON-ZCRO CHAR. '•■ 
LET 8TBUF :- #252 

CALL TIMER IN <«1000.«RCVRD0NE.RCSR.«SET> 



IF. ERROR THEN 



I RECIEVER DONE DID NOT SET 
ERRHRD 115 



•211: 



TSTB 
BEQ 



SRBUF 
•212 



ERROR 121 



ENDIF 



IFB 0WUF NE «0 THEN 



i BREAK DID NOT EQUAL 0 
ERRHRD 121 .BADBRK 



•212: 



ENDIF 



MAIIC6C-22-CV0VA-D MACYll 30A(10S2) 12 JUL 84 09:52 PAG£ 99 

CVDVAO.Pll 12-JUL-04 05:04 T40 TEST BitEAK GENERATION LXIC 



sew ^1 



4110 011322 

4111 011S22 000005 

4112 011S24 

4113 011S24 000413 

4114 011S26 051102 040505 020113 

4115 011334 044504 020104 047516 

4116 011342 020124 050505 040525 

4117 0)1350 020114 000060 
4118 

4119 011354 



RESET 
BR 



BRESEl (CLEAN UP 



TST41 



EXIT 

iiiEXIT THIS TEST 

BAOBRK: .ASCIZ /BREAK DID NOT EQUAL 0/ 



ENDTST 



«*IK)€C-ZZ-CVOVA-0 MACYll 30A(10S2) 12-JUL-84 09:52 PAGE 100 

CVOVAO.Pll 12-JU.-S4 05:04 T40 TEST BREAK GENERATION LOCK 



SEQ 96 



4120 
4121 
4122 
4125 
4124 
4125 
4126 
4127 
4126 
4129 
4130 
41S1 
4152 
41S5 
4134 
4135 
4136 
4137 
4136 
4139 
4140 
4141 
4142 
4143 
4144 
4145 



{•TEST 41 



NOT A TEST • SEND BACK TO LOOP 



011354 
011356 
011364 
011370 

011402 
011402 
011406 
011410 
011414 

011430 
011430 
011434 
011436 
011442 

011456 
011456 
011462 
011464 
011470 



000004 
012767 
104401 
000404 



016746 
104402 
104401 
000405 



016746 
104402 
104401 
000405 



016746 
104405 

005067 
000167 





1 9 I ^ A • 








000001 




HOV 


•1 tTIMES 


1 iDO 1 ITERATION 


oils 




TYPE 




II TYPE ASCIZ STRING 




BR 


64t 


iiGET OVER THE ASCIZ 




1 i65i • 


ASCIZ 


<CRLF>*t.SR* * 






641 • 
















1 1 SAVE DLADD FOR TYPEOUT 




TYPOC 




iiGO TYPE- -OCTAL ASCIKALL DIGITS) 






TYPE 


.671 


isTYPE ASCIZ STRING 




BR 


66t 


i iGET OVER THE ACCIZ 




1 '671 • 


ASCIZ 


•.VECTOR- • 






661 • 

WW* • 








AO 'Occ 




HOV 




11 SAVE OLVEC FOR TYPEOUT 




TYPOC 




iiGO TYPE--OCTAL ASCIICALL DIGITS) 


011444 




TYPE 


.691 


iiTYPE ASCIZ STRING 




BR 


661 


IiGET OVER T»€ ASCIZ 




II69I: 


.ASCIZ 


•.ERRORS: • 






6et: 








167430 




NOV 


•ERTTL.-(SP) 


II SAVE lERTTL FOR TYPEOUT 




TYPOS 




iiGO TYPE--OECIHAL ASCII WITH SIGN 


167422 




CLR 


lERTTL 


1 RESET FOR NEXT DEVICE/PASS 


170250 




JMP 


LOOP 


1 BACK UP TO THE BEGINNING 



NAINDEC-ZZ-CVOVA-0 MACYll 
CVOVAO.Pll 12-JUL-S4 05:04 



50A(1052) l2-JUL-d4 09:52 PAGE 101 

T41 NOT A TEST - SEND BACK TO LOOP 



S€Q 99 



4146 




4147 




4146 




4149 


011474 


4150 


A 4 4 A 

011474 


4151 




4152 




4153 




4154 




4155 




4156 




4157 




4158 




4159 




4160 




4161 




4162 




4163 




4164 




4165 




4166 




4167 




4166 




4169 




4170 




4171 




4172 




4173 




4174 


011474 


4173 


011474 


4176 


A« « K_A^ 

011502 


4177 


A4 4 K_A^ 

011502 


4178 


A 4 4 K • A 

011510 


4179 


011510 


4150 




4101 




4lK 




4103 




4184 


A4 4 K 4 X 

011516 


A 4 AC 

4105 


A 4 4 K 4 ^ 

011516 


A 4 AX. 

41B6 




^ 4 AT 

4107 


A4 4 K 4 

011516 


^ 4 MA 

4150 


A4 4 K 4 

011516 


A 4 AA 

4 109 


i%4 4 

011524 


4190 


011526 


^ 4 04 

4191 


All 

011526 


A 4 

4192 


Alt 

0115)4 


A 4 OV 

4193 


All 

011994 


4194 


Al 1 

011596 


4193 


Al 1 KMA. 
01199O 


41W 


A* 1 


419f 




4196 


011544 


4199 




4200 




4201 


011544 



iiBOtlOO 



sues 



000001 
000000 



016567 
016567 
112767 



000004 
000000 
000000 



000136 
000132 
000126 



ROUTINE TIMER <HOUL0NC.yHIC»«IT .REG.SETCLR> 

TIMER: 

ROUTINE: TIMER 

THIS ROUTINE IS USED TO TEST THE STATUS OF ANY BIT 
IN ANY REGISTER. 
INPUTS: 

HOM.0NG THE MAXIMUM AMOUNT OF TIME TO SPE»0 IN 

THIS ROUTINE. 
UHICHBIT A MASK UITH THE BIT(S) SET THAT ARE 

TO BE DCCKED. 
REG A POINTER TO T»C REGISTER TO BE C»CCKEO 
SETCLR T»C DESIRED RESULTS 

EIT»CR tSET OR KLEAR 

OUTPUT: 

THE 'C BIT IS SET TO I»OICATE AN ERROR 
BUT IT IS TESTED BY T»C IF. ERROR STATEfCNT 

NOTE:: T»C USE OF (RS) IS PART OF T»€ LIMCAGE 

MECHANISM BETUEEN T»C CALLER AND T»€ CALLED 



TRUE- 1 

FALSE- 0 

LET REGSAV :- REG(RS) s GET POINTER TO REGIST 

LET TIHSAV :- HOULONG(RS) s SAVE HOULONG FOR 

LET FLAG :B- #fALSE j INITIALIZE T« EXIT FLA 

i START OF AN If#^INITE LOOP 



MOV 
MOV 
MOVB 



REG(RS). REGSAV 
H0UL0NG(R5;. TIHSAV 
•FALSE. FLAG 



»215: 



LOOP 



056577 
001004 

112767 

000405 



000002 
000000 



000114 
000111 



BIT 



112767 177777 000101 



1217: 



1220: 



MOVB 
BR 

MOVB 



UHIC»€IT(RS).«)EGSAV 
•217 

KLR.HOLDSC 
»220 

•SET.HOLOSC 



I TEST TO SEE IF UMIC»«IT IS SET 
IF UHIC»«IT(R5) NOTSETIN SHEGSAV T»€N 



LET 

ELSE 

LET 
ENOIF 



HOLOSC :B- KLR 



HOLOSC :B- #SET : REMEWER THIS 



i NOU SFt ir THAT UAS UHAT UE WANTED 

IFB HOLOSC EG SETCLRCRS) THEN 
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4202 


011544 


126765 


000075 


000006 




CMpe 


H0LDSC.SETCLR(R5) 




4205 


011552 


OOlOOS 










«221 




4204 
















I JUST THE THING UE NEEDED 


4205 


011554 














LET FLAG :8- •TRUE 


4206 


011534 


112767 


000001 


000062 




novB 


•TRUE. FLAG 




4207 


011562 














ENDIF 


4206 


011562 








1221: 








4209 


















4210 


011562 














EXIFB FLAG EQ •TRUE OR TIMSAV LE •O 


4211 


011562 


126727 


000056 


000001 




CMPB 


FLAG.#TRUE 




4212 


011570 


001414 








BEQ 


$216 




4213 


011572 


005767 


000044 






TST 


TIMSAV 




4214 


011576 


003411 








BLE 


1216 




4215 
















i ONE UAY OR THE OTHER. UE ARE DONE 


4216 
















( IF UE ARE SriLL HERE THEN HANG AROUND A UHILE 


4217 


















4216 


011600 














UAITNS 1 lUAIT FOR 10 MILLI -SECONDS 


4219 


011600 


010546 








nov 


R5.-CSP) 




4220 


011602 


012745 


000001 






NOV 


♦l.-(R5) 




4221 


011606 


004767 


000140 






JSR 


PC.UAIT 




4222 


011612 


012605 








nov 


(SP)«.R5 




4225 


011614 














LET TinSAV :- TinSAV • •! s COUNTING DOUN 


4224 


011614 


005367 


000022 






DEC 


TIHSAV 




4225 


011620 














ENDLOOP i CONTINUED AT THE TOP 


4226 


011620 


000736 








BP 


1215 




4227 


011622 








1216: 








4226 


















4229 












1 ONLY 


2 IMYS TO GET HERE 




4230 












i 


1). UE RAN OUT OF 


TIME ---ERROR • ! 


4231 












t 


2). THE BIT IS IN 


THE CORRECT CONDITION- -GOOD ! ! 


4232 


















4233 


011622 














IFB FLAG EQ •TRUE THEN 


4234 


011622 


126727 


000016 


000001 




CHPB 


FLAG.#TRUE 




4235 


011630 


001001 








BNE 


1222 




4236 


011632 














RETURN NO. ERROR : GOOD 


4237 


011632 


000405 








BR 


»213 




4236 


011694 














ENDIF 


4?39 


011634 








*222: 








4240 


011634 














RETURN ERROR : BAD 


4241 


011634 


000261 








SEC 






4242 


011636 


000404 








BR 


1214 




4243 


















4244 


011640 


000000 












REGSAV: .UORO 0 


4245 


011642 


000000 












TinSAV: .UORO 0 


4246 


011644 


<.30 












FLAG: .BYTE 0 


4247 


011645 


000 












MOLDSC: .BYTE 0 


4246 














t UE ARE DONE GO BACK HOME 


4249 


011646 














ENDRTN 


4250 


011646 








t2lS: 








4251 


011646 


000241 








CLC 






4252 


011650 








»214: 








4253 


011650 


000207 








RTS 


PC 
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SEQ 101 



4254 
4255 
4256 
4257 
4258 
4259 
4260 
4261 
4262 
4263 
4264 
4265 
4266 
4267 
4268 
4269 
4270 
4271 
4272 
4273 
4274 
4275 
4276 
4277 
4276 
4279 
4260 
4261 
4262 
426S 
4284 
4265 
4266 
4267 
4266 
4269 
4290 
4291 
4292 
4293 
4294 
4295 
4296 
4297 
4296 
4299 
4S00 
4301 
4302 



011652 
011652 



011652 
011652 
0) 1656 
011656 
011664 
011670 
011674 

011700 
011700 
011706 
011710 
01171C 
011714 
011714 
011722 
011724 
011724 
011730 
011730 
011736 
011736 
011740 
011740 
011740 
011744 
011744 
011746 
011750 
011750 
011750 
011750 



005065 000000 



016767 
016746 
042716 
042667 



012767 
000402 

005267 

026767 
00S006 

006365 

052765 

000764 



167336 
000056 
000017 
000046 



000062 



000001 167364 



167356 
167SS2 

000000 
000001 



000024 



000000 



ROUTINE DATLNC <NASK> 
OATLNG: 

s* ROUTINE :DATLNG 

:* THIS ROUTINE SETS UP A MASK FOR DATA. UITH 

s* INPUT - NOTHING IS PASSED TO THIS ROUTINE 

BUT GLOBAL It^ORMATION IS ASSUMED TO EXIST: 
lUSyR-- THE UORO FOR SOFTUARE PARAMETERS 
DA A-- A MASK FOR THE LOCATION OF THE OCTAL 
NUMBER OF DATA BITS 



I* 
«• 
»• 
I* 
»• 
I* 
I* 

II* 



OUTPUT--- 
MASK- 



A MASK OF BINARY ONES RIGHT- JUSTIFIED 

T»C NUMBER OF UHICH IS DEFINED IN lUSUP UORO. 



CLR 

MOV 
MOV 
BIC 
BIC 



MASKCRS) 

lUSUR.NUTBR 
NUMBR.-(SP) 
«DATA.(SP) 
(SP)*.NUMBR 



1226: 
t225: 



•227: 



005165 000000 

000401 
000000 



000207 



•223: 
•224: 



MOV 
BR 

INC 

CMP 
BGT 

ASL 

BIS 

BR 

COM 
BR 

NUMBR:0 



RTS 



n.i 

•225 



It^UMBR 
•227 

MASKCRS) 
•1. MASKCRS 
•226 

MASKCRS) 
•223 



PC 



LET MASKCRS) :- M 

LET NUMBR :- •USUR AND COATA 



INCR I FROM n TO NUTOR BY #1 



: START 



LET MASKCRS) :- MASKCRS) SHIFT #1 
LET MASKCRS) :• MASKCR5) SET. BY #1 
ENDING 

LET MASKCRS) :- COMP MASKCRS) 



RETURN 



ENDRTN 
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450S 
















4304 
















4305 


011752 






ROUTINE 


UAIT 


<TIME> 




4306 


011752 






WAIT: 








4307 








i* ROUTINE :UAIT 






4306 








{• 


THIS ROUTINE IS USED TG 


DELAY EXECUTION OF THE 


4309 








s • 


flAIN 


PROGRAM FOR A SPECIFIED AMOUNT OF TIME. 


4310 








J* 


THIS 


IS ACCOMPLISHED BY INCREMENTING A 


4311 








i • 


REGISTER UP TO A LIMIT. 


THE I»NER LOOP IS SET 


4312 








i • 


TO APPROXIMATE 1 MILL I 


SEC. 


4313 
















4314 


011752 


010146 






NOV 


Rl.-(SP) 


ItPUSH Rl ON STACK 


4315 


011754 


010246 






HOV 


R2.-(SP) 


> iPUSH R2 ON STACK 


4316 


011756 


010546 






NOV 


R5.-(SP) 


t tPUSH R5 ON STACK 


4317 


011760 








LET Rl 


:" TIME(R5) 




4316 


011760 


016S01 


000000 




NOV 


TIME(R5).R1 




4319 


011764 








nCRU R2 FROn TO Rl BY tl 


4S20 


011764 


012702 


AAAAAS 

000001 




NOV 


•1 R2 




4S21 


011770 


JM^AA AA 

000402 






BR 


•252 




4322 


011772 






VcSO * 








4 325 


011772 


062702 


00000' 




ADO 


#oi ftp 




4524 


011776 






vcAc : 








4525 


011776 


A*kA AAa 

020201 






CMP 


ftp ftl 




4326 


012000 


101010 






BHI 


1234 




4527 


012002 










INCR R5 FROM M 


TO tlOO BY #1 


4326 


012002 


005005 






CLR 


R5 




4329 


012004 


000401 






BR 


1255 




4330 


012006 






*c : 








4331 


012006 


005205 






INC 


R5 




4332 


012010 














4353 


012010 


020527 


000100 




CMP 


R5.«100 




4354 


012014 


005001 






BGT 


1257 




4355 


012016 










EM>INC 




4396 


012016 


AAA'VDV 

000773 






BR 


1236 




455/ 


012020 














4550 


012020 








EWINC 






4559 


012020 


000764 






BR 


1255 




4540 


012022 






I2S4: 








4541 


012022 


012603 






NOV 


(SP)».fl5 


i tPOP STACK INTO R5 


4542 


012024 


012602 






NOV 


(SP)*.R2 


J J POP STACK INTO R2 






UXtfDOl 






NOV 


(SP)».Rl 


,,POP STACK INTO Rl 


4344 


012050 






EMWTN 






4545 


012030 






1230: 








4346 


012050 






t2Sl: 








4347 


012050 


000207 






RTS 


l»C 
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4540 
4549 
4 350 
4S51 
4352 
4353 
43S4 
4355 
4356 
4357 
4350 
4359 
4360 
4361 
4362 
4363 
4364 



012032 



.S8TTL INTSRV INTERRUPT SERVICE RQUIINE 

INTSRV* 

SERVICE ROUTINE: INTSRV 

THIS GLOBAL ROUTIIC DOES NOTHING BUT INCRE^CNT 
•INTFLAG' EACH TI>C IT IS CALLED. IT ASSUTCS 
THAT THE MAIN CALLING ROUTINE UILL KNOW WHAT 
TO LOOK FOR. 



012032 

012032 005267 000002 
012036 

012036 000002 
012040 000000 



INC 

EM)SRV 
RTI 

INTFLAG: 0 



INTFLAG 



iAOO 1 TO 'INTERRUPT OCCUREO' FLAG 

LET INTFLAG 

jTHAT'S ALL 



INTFLAG 



rMIIiOEC<7CV0VA0 



CVDVAD 


PI 1 


9 9 II ■ 

L2-»AJL -64 




4365 








4366 


012O42 






4367 


012042 






4366 








4369 


012O42 


t Ad A A 1 

104401 


012050 


4370 


012O46 


000405 




4371 








4372 


A % '%AA ^ 

012062 






4373 


012062 


A* ^ 

016746 


167112 


4374 


012066 


104402 




4375 


0120'O 


1 AA ^ A « 

1O4401 


A 9 ^^7^ 

0120/6 


4376 


01207* 


0004O5 




4377 








4578 


012110 






4379 


A« ^ 4 4 A 

012110 


116767 


6 d ^ A^^% 

167000 


« • AA 

43M 


012116 


A6 X 

016746 


167054 


4M1 


012122 


104402 




4302 


A« A« A^ 


9 AddA4 

104401 


Al 91 V9 

012132 


4393 


A« A* 9>A 

OlclW 


AAAd Ad 

000404 




4304 








4SBS 


A6 6 d 

012142 






4366 


012142 


016746 


166 rsO 


A VAT 


t\\ A« 

01214O 


9 Ad ^ AA 

104402 




4366 


A« A« KA 

0121w 


104401 


At ^4 £^ 

012156 


436^ 


^9 »^ 

0121^ 


000404 




• 3TPO 








#391 


A6 ^ « 

012166 






*3t£ 


012166 


A9 X 

016746 


167062 


*393 


^4 T% 

012172 


t Ad d A9 

104402 






tf%t ^1 TA 
012174 


• AddA9 

104401 


A4 9'^A^ 

012202 




012200 


000405 




*3to 








#39 f 


012214 






*3W 


A9 999 A 

0X2214 


016746 


167036 


#3W 


012220 


6 Ad d A'^ 

104402 




44Q0 


012222 








Ulcscc 






4402 


012222 






4403 


012222 


000207 
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ROUTINE HYTYPE 
MYTYPE: 



167060 



i i' 



ii65r 

641: 



n67li 
661: 



Ii69l: 
661: 



j|71»: 
701; 



721: 



ENDRTN 

1240: 

1241: 



TYPE 


.65» 


BR 


64> 


.ASCIZ 


<CRLf>»TEST * • 


HOV 


♦TESTN, -(SP) 


TYPOC 




TYPE 


.67$ 


BR 


661 


.ASCIZ 


*. ERROR 4 * 


novB 


IITENB. (FATAL 


MOV 


•FATAL, -(SP) 


V wAAA 

TYPOC 




TYPE 


^ Ad 

.691 


BR 


661 


.ASCIZ 


•.PC • • 


nov 


•ERRPC. -(SP) 


TYFOC 




T YFt 


. '1» 


BR 


70 » 


.ASCIZ 


♦.CSR: • 


NOV 


OLAOO.-(SP) 


TYPOC 




TYPE 


.73$ 


BR 


72$ 




• . VCL 1 W : ♦ 


NOV 


OLVEC.-(SP) 


TYPOC 




RTS 


PC 



TYPE ASCIZ STRING 
GET OVER TKC ASCIZ 



J SAVE $ TESTN FOR TYPEOUT 

>G0 TYPE --OCTAL ASCIKALL DIGITS) 

(TYPE ASCIZ STRING 

;GET OVER THE ASCIZ 



APT FATAL ERROR NUTSER 
J SAVE $FATAL FOR TYPEOUT 
tGO TYPE- -OCTAL ASCIKALL DIGITS) 
:TYPE ASCIZ STRING 
;GET OVER T»€ ASCIZ 



»SAVE $ERRPC FOR TYPEOUT 

{GO TYPE--KTAL ASCIKALL DIGITS) 

;TYPE ASCIZ STRING 

:GET OVER TKC ASCIZ 



iSAVE OLAOO FOR "-rPEOUT 

tGO TYPE -OCTAL ASCIKALL DIGITS) 

iTYPE ASCIZ STRING 

iGET OVER THE ASCIZ 



»SAVE OLVEC FOR TYPEOUT 

sGO TYPE- -OCTAL ASCIKALL DIGITS) 





ZZ CVOVA D 






Pll 


12 JU. 84 


05'04 


4404 


01222* 






4405 


012224 






4406 








4407 








4406 








4409 








4410 








4411 








4412 








4415 








4414 


012224 






4415 


012224 






4416 


012224 






4417 


012224 


005767 


000122 


4418 


012230 


001027 




4419 


012232 






4420 


012232 


026727 


000116 


4421 


012240 


001003 




4422 


012242 






4425 


012242 


005067 


000106 


4424 


012246 






4425 


012246 


000403 




4426 


012250 






4427 


012250 






4426 


012250 


004767 


000110 


4429 








4450 


012254 






44S1 


012254 






4452 


012254 


012600 




44S3 


012256 






4434 


012256 






4435 


012256 






4456 


012256 


012767 


000001 


4437 


012264 






4436 


012264 


012767 


000001 


4439 


012272 






4440 


012272 


016767 


166752 


4441 


012300 






4442 


012300 


016767 


166740 


4443 


012306 






4444 


012306 


000410 




4445 


012310 






4446 


012310 






4447 


012310 


012704 


000010 


4446 


012314 






4449 


012314 


006167 


000032 


4450 


012320 






4451 


012320 


060467 


000032 


4452 


012524 






4453 


012324 


060467 


000030 


4454 


012330 






4455 


012330 






4456 


012330 






4457 


012330 


056767 


000016 


4456 


012336 


001732 




4459 
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mX/TINE CYCLE 
CYCLE : 

I* ROUTINE: CYCLE 

I* THIS ROUTINE CAUSES AORS TO POINT TO THE 

!• AOORESS OF OLVll-E UWXR TEST. AQRS •2 TO 

>• POINT TO T»€ VECTOR Of T»C OLVll-E UMCR TEST. 

IT KEEPS TRACK OF T»C CURRENT DEVICE AND BIT 

HASKS. 



SCO 105 



000001 



000066 
166712 
000056 
000052 



166714 



>244: 



CLR 
BR 

1246: 

JSR 

SPECIAL AOORESS: 
MOV 



TST BITMASK 
BNE 1245 

CMP INITFLAG.#1 
•246 



INITFLAC 
•247 

PC.^ECP 
(SP)».R0 



•247: 



•245: 



•250: 



MOV tl. BITMASK 

MOV •l.^DEVCT 

MOV IBASE.MIORESS 

MOV fVCCTl, VECTOR 

BR 1250 

MOV •10.R4 

ROL BITMASK 

ADD R4. AOORESS 

ADD R4. VECTOR 



BIT BITMASK. •OCVM 
BEQ ^244 



REPEAT 

IF BITMASK EQ #0 THEN 

IF INITFLAC EQ #1 THEN 

LET INITFLAC :- #0 



ELSE 



CALL •EOP 



AS A SUBROUTINE 



t BECAUSE •EOP RETURNS AS A Jlf«> 
LET RO :- POP 



EfOIF 

LET BITMASK 
LET •OEVCT : 
LET MX)RESS 
LET VECTOR : 



:■ #1 
' #1 

tBASC 
■ IVECTl 



ELSE 



LET R4 :■ 910 

LET BITMASK :- BITMASK ROTATE 1 
LET ADDRESS :- ADDRESS • R4 
LET VECTOR :• VECTOR • R4 
E»OIF 

UNTIL BITMASK SETIN »OtVM 
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4460 
4461 
4462 
4465 
4464 
4465 



4469 
4470 
4471 
4472 
44 7S 
4474 
4475 
4476 



012540 

012540 012701 012S56 
012544 

012544 00S267 166654 

012550 

012 550 000404 

012552 000000 

012554 000001 

012556 000000 

012S60 000000 

012562 
012S62 
012362 

012 j62 000207 



BIThASK: 
INITFLAG: 
ADDRESS: 
VECTOR: 



WOV 
INC 
BR 



1242: 
1245; 



RTS 



LET AO«S :• •AOOPESS 
•ADDRESS. AORS 

LET »OEVCT lOEVCT . •! 



lOEVCT 

»242 

0 
1 
0 
0 



PC 



RETURN 



ENORTN 
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447; 
44 78 
44 79 
4480 
4481 
4462 
4483 
4484 



.S8TTL END OF PASS ROUTINE 



itlNCMEHENT T»€ PASS NUr«ER (IPASS) 

{•INDICATE END-OF -PRXRAfI AFTER 1 PASSES THRU THE PROGRAM 
(•TYPE -EM) PASS •XXXXX" (UlCRE XXXXX IS A DECIHAL NU»«ER) 
i*IF T»€RES A MONITOR GO TO IT 
i*IF T»CRE ISN'T JUMP TO SPECIALAQORESS 



4485 
4466 


012 S64 








tEOP: 


SCOPE 






M«7 
4488 


012364 


000004 










(ZERO T»€ TEST NU»«ER 


012366 


005067 


166510 






CLR 


tTST»t1 1 


4469 


012372 


005067 


166562 






CLR 


ITIMES 1 


(ZERO THE NUMBER OF ITERATIONS 


4490 


012376 


005267 


166600 






INC 


IPASS t 


{INCREMENT THE PASS NUMBER 


4491 


012402 


042767 


100000 


166572 




BIC 


#100000. IPASS 1 


lOON'T AI.LOU A NEG. NUMBER 


4492 


012410 


005527 








DEC 


(PC)* 1 


iLOOP? 


4493 


012412 


000001 






lEOPCT: 


.UORO 


1 




4494 


012414 


005022 








BGT 


lOOAGN t 


lYES 


4495 


012416 


012757 








HOV 


(PC)»,«(PC)» 1 


(RESTORE COUNTER 


4496 


012420 


000001 






lEWCT: 


.UORO 


1 




4497 


012422 


012412 








•EOPCT 




iTYPE -EW PASS 


4496 


012424 


104401 


012471 






TYPE 


.lEIOMG 1 


4499 


012450 


016746 


166546 






MOV 


IPASS. -(SP) 1 


iSAVE IPASS FOR TYPEOUT 


4500 


012454 


104405 








TYPOS 




iGO TYPE—DECIMAL ASCII WITH SIGN 


4501 


012456 


104401 


012466 






TYPE 


. lENULL 


iTYPE A NULL CHARACTER 


4502 


012442 


015700 


000042 




IGET42: 


MOV 


••42. RO 1 


iGET MONITOR ADDRESS 


4505 


012446 


001405 








8EQ 


IDOAGN 1 


iBRANCH IF NO MONITOR 


4504 


012450 


000005 








RESET 




laEAR THE UORLO 


4505 


012452 


004710 






•ENDAO: 


JSR 


PC.(RO) 


iGO TO MONITOR 


4506 


012454 


000240 








NOP 




iSAVE ROOM 


4507 


012456 


000240 








NOP 




iFOR 


4506 


012460 


000240 








NOP 




iiACTll 


4509 


012462 








lOOAGN: 






iiRETURN 


4510 


012462 


000157 








JMP 


8(PC)* 


4511 


012464 


012254 






tRTNAO: 


.yORD 


SPECIAL ADDRESS 




4512 


012466 


577 


577 


000 


•EMULL: 


.BYTE 


-l.-l.O 


ilNULL CHARACTER STRING 


451S 


012471 


015 


042412 


042116 




.ASCIZ 


<15><12>/EIC PASS •/ 


4514 


012476 


050040 


051501 


020125 










4515 


012504 


000045 
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4S16 
4517 
4S1S 
4519 
4520 
4521 
45^2 
4523 
4524 
4525 
452« 
4527 
4526 
4529 
4530 
4531 
4532 
4533 
4534 
4535 
4536 
4537 
4538 
4539 
4540 
4541 
4542 
4543 
4544 
4545 
4546 
4547 
4546 
4549 
4550 
4551 
4552 
4553 
4554 
4555 
4556 
4557 
4556 
4559 
4560 



.SeTTL POMER DOMN AND UP ROUTINES 



012506 
012514 
012522 
012524 
012526 
012530 
012532 
012534 
012536 
012542 
012546 
012554 
012556 



012737 
012737 
010046 
010146 
010246 
010346 
010446 
010546 
017746 
010667 
012737 
000000 
000776 



012652 000024 
000340 000026 



166376 
000110 

012560 000024 



iPOUER DOUN ROUTINE 
IPURON: nOV ••ILLUP,8«PURVEC 
#S40.8«PURVEC*2 
RO.-(SP) 
Rl.-(SP) 
R2.-(SP) 
R3..(SP) 
R4.-(SP) 
R5.-(SP) 
SSUR.-CSP) 
SP.ISAVR6 
•IPURUP.MPURVEC 



nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 

HALT 
BR 



I SET FOR FAST UP 
PRI0:7 

PUSH RO ON STACK 
PUSH Rl ON STACK 
PUSH R2 ON STACK 
PUSH R3 ON STACK 
PUSH R4 ON STACK 
PUSH R5 ON STACK 
PUSH 0SUR ON STACK 
SAVE SP 
I SET UP VECTOR 



ilHANG UP 



iPOMER 







wXCw JC 






nov 


012566 


016706 


000064 






nov 


012572 


005067 


000060 






aR 


012576 


005267 


000054 




11: 


INC 


012602 


001375 








B»C 


012604 


012677 


166330 






nov 


012610 


012605 








nov 


012612 


012604 








nov 


012614 


012603 








nov 


012616 


012602 








nov 


012620 


012601 








nov 


012622 


012600 








nov 


012624 


012737 


012506 


000024 




nov 


012632 


012737 


000540 


000026 




nov 


012640 


104401 








TYPE 


012642 


012660 






IPURM6: 


.UORD 


012644 


012716 








nov 


012646 


001336 






IPIAAO: 


.UORD 


012650 


000002 








RTI 


012652 


000000 






IILLUP: 


HALT 


012654 


000? 76 








BR 


012656 


000000 






ISAVR6! 


0 


012660 


005015 


047520 


042527 


IPOMER: 


.ASCIZ 


012666 


000122 











UP ROUTINE 

•IlLLUP.atPURVEC 
ISAVR6.SP 
ISAVR6 
ISAVR6 
II 

(SP)*.0SUR 
(SP)».R5 
(SP)».R4 
(SP)*.RS 
(SP)*.R2 
(SP)*.R1 
(SP)*.R0 
•IPURDN.MPMVEC 
#340.a#PURVEC*2 

IPOUER 

(PC)».(SP) 
START 



.-2 

< 15x12 >"POUER " 



I (SET FOR FAST DOUN 
iGET SP 

tUAIT LOOP FOR THE TTY 
lUAIT FOR T»C INC 
lOF UORD 

iPOP STACK INTO 8SUR 

I POP STACK INTO R5 

iPOP STACK INTO R4 

iPQP STACK INTO R3 

I POP STACK INTO R2 

iPOP STACK INTO Rl 

I POP STACK INTO RO 

iiSET UP T»C POUER DOUN VECTOR 

|PftI0:7 

REPORT T»C POUER FAILURE 
iPOUER FAIL HESSAGE POINTER 
iRESTART AT START 
iRESTART ADDRESS 

|T»C POUER UP SEQUENCE UAS STARTED 
I BEFORE T»C POUER DOUN UAS COMPLETE 
iPUT T»C SP »CRE 



.EVEN 



MAIICeC -ZZ CVOVA 0 MACYll 50A(1052) I2-JU.-S4 09:52 P«GE III 

CVOVW.PII 12- JUL -84 05:04 TYPE ROUTINE 

.SBTTL TYPE ROUTINE 



SEQ 109 



4561 








M r ^ ^ 

4562 








4563 








4564 








4565 








4566 








4567 








4560 








• 56 








ACTA 

45 f O 








4571 








4572 








ACTS 
4575 








ACTA 

4574 








AC 7C 

45 f 5 








ACTA 

45 '6 








AKTT 

4577 








ACTS 

457B 


0126 rO 


lv3 '6 r 


« AA-^« 

lDDs03 


ACTA 

4579 


0126 '4 


lOWWe 




ACAA 

45W? 


UXc6 '6 






A«a « 

4501 


Ulc 'UU 


AAAA VI 




430iC 


At 


Al A/IAC 




4503 


At 37A4 
01iC»W4 


Al 7*Mk 


000002 


A««A 

4504 


At 971 A 






4305 


Al 97f A 
16 


AAtAI 1 
WlVll 




4300 


Al 373n 


1 07&7 
ISc 'O ' 


AAAI AO 


430 1 


Al OTOti 


AAl AAg 

UU1*V3 




4 jOQ 


Al 37VA 
Olc ' dv 


AtlWML7 






Al 37TA 


WI4 'O » 


AAA77A 


4 


Al 37AA 
U12 »4W 








Al OIAO 
Olc r4«f 


t U7&7 
19c 'Or 


AA V>4A 


43TP^ 


Al 374A 


AAt/MV 




43Tr3 


Al 370 


112V40 






Al OTKA 
Olc '54 


AAt AA< 






Al 37V& 
012 '56 


AA^79A 
WO '26 




43lW 


Al 37ILA 


At ^&AA 






At 97^3 


A&S7t& 
mC'16 


AAAAA9 




At 37&iL 


000002 






Al 977A 
Olc ' ' w 


t 997t & 
122716 


MIAAt 1 




Af 377A 
Ulcr '4 


Mil 




40vi 


Al 3774L 
Ulc ' 'O 


1 397 liL 
122' 16 


MWI9AA 




At W>3 


Mil <V>& 






Al 

U13*W4 


'cO 






Al 


1 AAAA« 

lU4^m 






Al XA1 A 


Mil 1 71 
Wll rl 




*o*w 


Al XAl 3 


1 A^/ML7 


AAAI XA 


4iU)7 


At XAIlk 


MWI7<(^ 






Al VA3A 


<VIA7Jk7 
WI4 'O » 


MWV(^ 
UWA/30 




Al XA?A 


1 34«73ll 


1 AAI 3A 




Al XAXA 


Mil "K^n 








UXO '^O 


lAikl 
XOOXXD 










4613 


013056 


105366 


000001 


4614 


013042 


002770 




4615 


013044 


004767 


000032 


4616 


013050 


105367 


000072 



166276 
166267 



l«A0UTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE UlTh A 0 BYTE. 
l*T»C ROUTINE UILL INSERT A NUMKR OF NULL CHARACTERS AFTER A LINE FEED. 
I4N0TE1: INULL CONTAINS T»C CHARACTER TO BE USED AS T« FILLER CHARACTER. 

i4N0TE2: IFILLS CONTAINS T»€ NUMBER OF FILLER CHARACTERS REQUIRED. 

I4N0TE3: IFILLC CONTAINS THE CHARACTER TO FILL AFTER. 

!• 

i*CALL* 

i*l) USING A TRAP INSTRUCTION 

llHESAOR IS FIRST ADDRESS OF AN ASCIZ STRING 



I ♦OR 

!• 

I* 



TYPE 

TYPE 
MESADR 



.fCSAOR 



•TYPE: 


TSTB 


•TPFLG 


Ills THERE A TERMINAL? 




BPL 


11 


iiBR IF YES 




HALT 




liHALT HERE IF NO TERMINAL 




BR 


31 


1 1 LEAVE 




MOV 


RO.-(SP) 


II SAVE RO 




NOV 


a2(SP).R0 


iiGET ADDRESS OF ASCIZ STRING 




cHpb 


MPTENV.IENV 


llRUMiING IN APT MODE 




BNE 


621 


tiNO.GO OCCK FOR APT CONSOLE 




BITB 


MPTSPQOL.IENVM 


tiSPOQL MESSAGE TO APT 




BEQ 


621 


1 iND.GO C»CCK FOR CONSOLE 




NOV 


R0.61* 


ii SETUP MESSAGE ADDRESS FOR APT 




JSR 


PC.IATY3 


iiSPOOL rCSSMZ TO APT 


61»: 


.yORO 


0 


iifCSSMZ ADDRESS 


62* : 


BITB 


MPTCSUP.«ENVM 


II APT CONSOLE SUPPRESSED 




BNE 


601 


11 YES. SKIP TYPE OUT 


2«: 


MOVB 


(RO)».-(SP) 


i iPUSH CHARACTER TO BE TYPED ONTO STACK 




BNE 


4« 


iiBR IF IT ISN'T THE TERMINATOR 




TST 


CSP)* 


lilF TERMINATOR POP IT OFF THE STACK 


60t: 


MOV 


(SP)»,RO 


1 iRESTORE RO 


31: 


ADD 


•2.(SP) 


II ADJUST RETURN PC 




RTI 


iiRETURN 


4t: 


CMPB 


•HT.CSP) 


itBRANCH IF <HT> 




BEQ 


81 






cm 


•CRLF.CSP) 


ilBRANCH IF NOT <CRLF> 




BNE 


51 






TST 


(SP)» 


ilPOP <CR><LF> EQUIV 




TYPE 




iiTYPE A CR AND LF 




ICRLF 








CLRB 


ICHARCNT 


llCLEAR CHARACTER COUNT 




BR 


2t 


iiGET NEXT CHARACTER 


51: 


JSR 


PC.ITYPEC 


iiGO TYPE THIS CHARACTER 


6t: 


CW 


»FILLC.(SP)» 


iilS IT TIME FOR FILLER CHARS.? 




BNE 


2< 


iilF NO GO GET NEXT CHAR. 




MOV 


tNULL.-(SP) 


iiGET # OF FILLER CHARS. NEEDED 






II AND THE NULL CHAR. 


71: 


OECB 


KSP) 


itOOES A NULL NEED TO BE TYPED? 




BLT 


61 


llBR IF NO- -GO POP THE NULL OFF OF STACK 




JSR 


PC.ITYPEC 


1 iGO TYPE A NULL 




DECB 


tCHARCNT 


iiDO NOT COUNT AS A COUNT 
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4617 015054 000770 BR 71 
461S 

4619 iHORIZONTAL TAB PROCESSOR 
4620 



4621 


013056 


112716 


000040 




81: 


NOVB 


.(SP) 


4622 


013062 


004767 


000014 




9t: 


JSR 


PC.ITYPEC 


462S 


013066 


132767 


000007 


000052 




BITB 


#7.fCHARCNT 


4624 


013074 


0013/2 








BNE 


91 


4625 


013076 


005726 








TST 


(SP). 


4«26 


OlSlOO 


000724 








BR 


21 


4627 


013102 


105777 


166042 




•TYPtC: 


TSTB 


81 TPS 


4628 


013106 


100375 








BPL 


•TYPEC 


4629 


013110 


116677 


000002 


166034 




NOVB 


2(SP>.8ITPB 


4630 


013116 


122766 


000015 


000002 




CMP8 


•CR.2(SP) 


4631 


013124 


001003 








BNE 


11 


4652 


013126 


105067 


000014 






aRB 


tCHARCNT 


4633 


013132 


000406 








BR 


ITYPEX 


4654 


013134 


122766 


000012 


000002 


11: 


CMPB 


•LF,2(SP) 


4635 


013142 


001402 








BEQ 


♦TYPEX 


4636 


013144 


105227 








INCB 


(PC)» 


4637 


013146 


000000 






•CHARCNT:.U0RO 


0 


4638 


013150 


000207 






•TYPEX: 


RTS 


PC 



4639 



iiLOOP 



{REPLACE TAB WITH SPACE 
I TYPE A SPACE 
I BRANCH IF NOT AT 
iT^ STOP 

I POP SPACE OFF STAC/ 

I GET NEXT CHARACTER 

lUAIT UNTIL PRINTER IS READY 

I LOAD CHAR TO BE TYPED INTO DATA REG. 
lis CHARACTER A CARRIAGE RETURN? 
I BRANCH IF NO 

I YES --CLEAR CHARACTER COUNT 
lEXIT 

lis CHARACTER A LINE FEED? 
I BRANCH IF YES 
t COUNT THE CHARACTER 
{CHARACTER COUNT STORAGE 
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4b40 












TTY INPUT ROUTINE 




4641 


















4642 


















4643 










.ENABL 


Lse 






4644 


















4645 


















4646 










(•SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 


4647 










{•ROUTINE IS ENTERED FROH THE 


TRAP HANDLER. AND WILL 


4648 










{•SERVICE THE 


TEST FOR CHANGE 


IN SOFTWARE SWITCH REGISTER TRAP CALL 


4649 










t*W»€N OPERATING IN TTY FLAG HOOE. 


4650 


013152 


022767 


AAA 6 ^M 

000176 


4 M K 7^ A 

165760 


fCKSWR; 


CnP 




Ills SOrT-SWR SELcCTED/ 


4651 


013160 


001074 










4 K A 

151 


1 1 BRANCH IF NO 


4652 


01S162 


105777 


m MK 

165756 






TSTo 


89 IKS 


1 tCHMR TKRCr 


4653 


013166 


• ArfW%7 4 

100071 










13* 


1 1 Ir NU . DON 1 UAl 1 Wf (AJND 


4654 


013170 


• « ^^MM 

117746 


165752 






novo 






465b 


015174 


J^M A^ • M 

0*2716 


177600 






BIL 


•»C177,tSr } 


||5THir-0rr Tt» Abbll 


4656 


01S200 


022726 


000007 






CHP 


♦7.(SP)» 


Ills IT A CONTROL G7 


4657 


01S204 


001062 








BNE 


151 


i iNO. RETURN TO USER 


4656 


01S206 


126727 


165722 


AAAAAl 

000001 




l.r»Tl 




. . ABC liB Di ooiTMP Tfti Al iTn tmnr o 


4659 


A6 Vk6 ^ 

01S214 


001456 








DCU 


l9* 


• aBBAMTU TP VCC 
1 IBRNNfl Xr Tea 


4660 
4661 


01S216 


• A^ A A* 

104401 


A« 77 

019677 






T VDC 

TYI^ 


. ICNTLu 


IICLHU TtC CONTRuL-G ('G) 


4662 


01S222 


• A^ A A6 

104401 


A« V7AA 

019704 




fuiSUR: 


1 Trt 


AMCLAl 


IllirX bUNRcNI LONIcNIb 


4669 


013226 


A6 M. ^MM. 

016746 


164744 






MA%f 

nov 


SHRLw* -l Sr J 


. . cAuc CiJDCc cno TVDCmiT 


M M M M. 

4664 


015252 


104402 








ITPOC 




. TVOC ^^TAI ACPTT^ Al 1 ^Tf*TTC^ 

1 tuO 1 Trt--OtTWL AsLlKALL DIuXTsi 


4665 


013234 


4 A J ^A6 

104401 


Al V^l C 

019715 










. .OOflMDT CnO MCU cuo 
1 irHUf V 1 rUN NcH sHR 


4666 


013240 


005046 






19* : 




^ CO ^ 


. .n CAO /*mA<Tco 


4667 


013242 


005046 










^ CO \ 


. - TftJC ftlCLJ CLAS 

1 1 11% NcU sMR 


M M M A 

4666 


019244 


« #^E777 

105777 


165674 




71 : 


VCTP 

TSTB 


■9TKS 


1 iCNWI Ttdic/ 


4669 

MM. 


At VISA 

019250 


100575 








on 


7* 
f • 


. . TC MAT TOV APATft4 

llXr NDI IRT MuMXN 


4670 

MM 

4671 


013252 


• • ^^MM 

117746 


% MKM 7 A 

165670 






HUVd 


BC TKD f CO ^ 


. .OTCV iO ^UAO 




013256 


042716 


4 77f AA 

177600 






SIC 


•▼1,1 r r,l9r J 


. .MAVC TT 7 BTT AC/'TT 

1 inMKC XI r-DXI MbLXX 
























































4676 


013262 


021627 


A#WW\^K 

000025 




9f : 




( 9f J • VC3 


• . TC TT A P/IMTOra 119 
l|X9 XI M LONIRUL-Ur 




015266 


001005 








BMC 

one 


1 n> 
lo» 


. im iiiri 1 TC mT 
1 isNwiLn Xr nui 


MM. 7a 
4676 


013270 


6 A^ A A4 

104401 


A 4 7 

013672 






TVDC 


APUTI II 


• •VCC cfun rnAiToni ii 


4679 


019274 


A< 17Af 

062706 


AAAAAX 

000006 






Ann 


ML CO 






019900 


000757 










1 OA 


• •ICT'C TBV TT A/^mTM 


•oBl 


















4692 


















4o65 


At SVA^ 

019902 


A^l 

021627 


000015 




10«: 


CHP 


(SP).#15 


Ills IT A <CR>7 


4664 


Al WJ^K 

019906 


tfW\6 A'^l 

001022 








BIC 


16« 


mBRanch if no 


4003 


Af Wl A 

019910 


005766 


AAAAAA 

000004 






TST 


4(SP) 


II YES. IS IT THE FIRST CHAR? 


4666 


Al Wl M 

019914 


4W^4 AAV 

001409 








BEO 


111 


iiBRANCH IF YES 


AAA 7 

4oB7 


Al Wl ^ 

019916 


016677 


UaEMMJI^ 


165614 




NOV 


2(SP).BSWR 


ilSAVE NEW SWR 


mm 

4669 


Al 

019924 


062706 


AAAAA^ 

000006 




111: 


AOO 


•6.SP 


iiCLEAR UP STACK 




Al WVA 

019990 


104401 


001171 




141: 


TYPE 


.•CRLF 


iiECHO <CR> AND <LF> 


4oW 


Al 

019994 


126727 


165575 


OOOOOl 




CHPB 


•INT AG. #1 


iiRE-ENABLE TTY KBD INTERRUPTS? 


•691 


Al ^ 

U19942 


001009 








BNE 


15» 


IiBRANCH IF NOT 




Al WW^A 


ni 3777 
VIC III 








HOV 


•100.89TKS 


iiRE-ENABLE TTY KBD INTERRUPTS 


4693 


013352 


000002 






151: 


RTI 




11 RETURN 


4694 


01SS54 


004767 


177522 




161: 


JSR 


PC.ITYPEC 


11 ECHO CHAR 


4695 


013360 


021627 


000060 






CHP 


CSP).«60 


tiCHAR < 07 
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4696 


01SS64 


002420 








DLT 


4 ft d 

IB* 


4697 


01SS66 


021627 


000067 








t CO 1 


4696 


013372 


005015 








PwT 


IB* 


4699 


013374 


042726 


/WW\AX A 

000060 






Bit. 




4700 


015400 


005766 


AAAAA'^ 

000002 






T5T 


CO ^ 
2l 5P ) 


4701 


015404 


001403 








ACA 

Bell 


4 7 A 

171 


4 702 


013406 


006516 










t CO ^ 


4705 


013410 


006516 








A CI 

HSL 


^ CO ^ 


4704 


015412 


006516 








ACI 

AM. 


f CO % 


4705 


015414 


AAA A« ^ 

005266 


AAAAAO 

000002 




4 7A . 

17f : 




CO ^ 


4706 


015420 


056el6 


177776 






BTC 

Bis 


3f CD ^ t CO ^ 
-215*' J, 1 5f J 


4707 


015424 


000707 








w* 


f 1 


4706 


A4 

015426 


104401 


#\A4 4 ^A 

0011^9 




101 : 


1 Trt 


A Al CC 


4709 


015452 


000720 








BR 


^AA 

201 


4710 










.OSABL 


LSB 




4711 
















4712 
















4713 
















4714 










i*THIS ROUTINE 


WILL IirUT A SII 


4715 










1 vLMLL : 






4716 










!• 


ROOM 




4717 










I* 


RETURN »CRE 


4716 










!• 






4719 










1 






4720 
















4721 


/%4 ^A^A 

015454 


011646 






lfiOC»«(: 


NOV 


(SP).-(SP) 


4722 


i\4 

015456 


016666 


000004 


000002 




NOV 


4(SP).2(SP) 


4725 


015444 


105777 


165474 




11: 


TSTB 


8ITKS 


4724 


015450 


100575 








BPl 


11 


4723 


015452 


4 4 ^^^^ 

117766 


4 7A 

165470 


AAAA^^ 

000004 




novB 


•ITKB.4(SP) 


4726 


015460 


042766 


177600 


O000O4 




BIC 


•tC<177>.4(SP) 




01546e 


0liM27 


iWWWW^ 

000004 


000023 




CHP 


4(SP).623 


4726 


ilC 

015474 


001019 








BNE 


51 


4729 


015476 


105777 


4£K^^9 

165442 




21: 


TSTB 


SITKS 


4730 


015502 


100575 








BPL 


21 


4 rSX 


013504 


4 4 ^^AA 

117746 


165456 






novB 


•ITKB.-(SP) 


4752 


/\ 4 M 4 A 

015510 


042716 


177600 






BIC 


•tC177.(SP) 


4 /35 


013514 


022627 


000021 






CHP 


(SP)*.«21 


4 f 54 


i\4 

015520 


001566 








BIC 


21 


4 f 33 


/\4 VK^*^ 

015522 


000750 








BR 


11 


4 f 5o 


A 4 

015524 


026627 


/W\AAA^ 

0000O4 


/VW%4 AA 

000140 


51: 


CHP 


4(SP).«140 


4 f 3 r 


A4 

0135S2 


002407 








BLT 


4> 


4 756 


013534 


t\^%AA '%7 

026627 


000004 


AAA* 

000175 




CMP 


4(SP).#175 




A4 V^^O 


005003 








BGT 


41 


< f *V 


A4 ^tiAA 

013544 


t\A'%^AA. 

042766 


AAAAii A 

000040 


AAAAA^ 

000004 




BIC 


•40.4(SP) 


• f 41 


A4 VKK*) 

013552 


000002 






4<: 


RTI 




4 f4i 
















4 r45 










I*THIS ROUTINE MILL INPUT A ST 


4 










l*CALL: 






4 »43 










!• 


RDLIN 




4 f46 










»♦ 


RETURN HERE 


4747 










»• 






4746 
















4749 


015554 


010346 






IROLIN: 


HOV 


R5,-(SP) 


4750 


013SS6 


012705 


015662 




11: 


NOV 


*ITTYIN.R5 


4751 


015562 


022705 


015672 




21: 


CHP 


*ITTVIN*6..R5 



bCQ 112 



I BRANCH IF YES 

iCHAR > 7? 

I BRANCH IF YES 

I STRIP-OFF ASCII 

lis THIS T»€ FIRST CHAR 

I BRANCH IF YES 

iNO. SHIFT PRESENT 

I CHAR OVER TO HAKE 

I ROOM FOR NEU ONE. 

I KEEP COUNT OF CHAR 

iSET IN NEU CHAR 

I GET THE NEXT ONE 

iTVPE 7<CR><LF> 

iSINULATE CONTROL -U 



E CHARACTER FRON THE TTY 

iII^UT A SINGLE CHARACTER FRQN T»€ TTY 
I CHARACTER IS ON THE STACK 
I WITH PARITY BIT STRIPPED OFF 



iPUSH DOUN T»€ PC 

I SAVE THE PS 

lUAIT FOR 

I A CHARACTER 

iREAO THE TTY 

iGET RID OF JUM( IF ANY 

lis IT A CONTROL'S? 

iBRANCH IF NO 

lUAIT FOR A CHARACTER 

I LOOP UNTIL ITS THERE 

iGET CHMACTER 

iNAKE IT 7-BIT ASCII 

lis IT A CONTROL -Q? 

I IF NOT DISCARD IT 

I YES. RESUME 

lis IT UPPER CASE? 

I BRANCH IF YES 

lis IT A SPECIAL CHAR? 

iBRANCH IF YES 

iMKE IT UPPER CASE 

iGO BACK TO USER 



N6 FRON THE TTY 

1 1 INPUT A STRING FRON THE TTY 

II ADDRESS OF FIRST CHARACTER UILL BE ON THE STACK 
1 1 TERMINATOR UILL BE A BYTE OF ALL 0' S 

1 1 SAVE R5 
iiGET ADDRESS 
1 1 BUFFER FULL? 
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4752 


015566 


101405 








BLOS 


4) 


4753 


013570 


104410 








ROCHR 




4 754 


013572 


112613 








HOve 


(SP)».(R3) 


4 755 


013574 


122713 


000177 




101: 


CMpe 


♦177. (R3) 


4756 


013600 


001003 








BNE 


31 


4757 


013602 


104401 


001170 




4$: 


TYPE 


.tOUES 


47Sa 


013606 


000763 








BR 


It 


4759 


013610 


111367 


000044 




St: 


novB 


(R3).9I 


4760 


013614 


104401 


013660 






TYPE 


.9$ 


4761 


013620 


122723 


000015 






CMPB 


•15. (RS)* 


4762 


013624 


001356 








BNE 


21 


4763 


013626 


105063 


177777 






CLRB 


-1(R3) 


4764 


013632 


104401 


001172 






TYPE 


• ILF 


4765 


013636 


012603 








nov 


(SP)».R3 


4766 


013640 


011646 








NOV 


(SP).-(SP) 


476V 


013642 


016666 


000004 


000002 




NOV 


4(SP).2(SP) 


4766 


013650 


012766 


013662 


000004 




NOV 


#ITTYIN.4(SP) 


4769 


013656 


000002 








RTI 




4770 


013660 


000 






91: 


.BYTE 


0 


4771 


013661 


000 








.BYTE 


0 


4772 


013662 


000010 






•TTYIN: 


.BLKB 


6. 


4773 


013672 


052536 


005015 


000 


ICNTLU: 


.ASCIZ 


/tU/<l5><12> 


4774 


013677 


136 


006507 


000012 


ICNTLG: 


.ASCIZ 


'♦G/<15><12» 


4775 


013704 


005015 


053523 


020122 


IHSyR: 


.ASCIZ 


<1S><12>/SUR 


4776 


013712 


020075 


000 










4777 


013715 


040 


047040 


05SS05 


•MNEU: 


.ASCIZ 


/ NEU - / 


4778 


013722 


036440 


000040 











SEQ 113 



iiBR IP YES 

:<G0 READ ONE CHARACTER FROM THE TTY 
tiGET CHARACTER 
Ills IT A RueOUT 
1 1 SKIP IF NOT 
ilTYPE A '?' 

. I CLEAR T»C BUFFER AND LOOP 
liECHO THE CHARACTER 

itC»CCK FOR RETURN 
I tLOOP IF NOT RETURN 
i {CLEAR RETURN (THE 15) 
I i I YPE A LINE FEED 
It RESTORE R3 

11 ADJUST T»C STACK AND PUT ADDRESS OF THE 
It FIRST ASCII CHARACTER ON IT 

t {RETURN 

1 1 STORAGE FOR ASCII CHAR. TO TYPE 
1 1 TERMINATOR 

1 1 RESERVE 8 BYTES FOR TTY INPUT 
It CONTROL "U" 
I {CONTROL "G" 
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fiACrii 
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APT COmUNICATZONS ROUTINE 


4 770 

n f f 










•SBTTL 


APT COMMUNICATIONS ROUT] 


mfaO 
















4 781 
















4702 


013726 


112767 


AAnnAi 


000296 


•ATYl: 


novB 


#1 • IF FLu 


4 765 


015754 


112767 


AAAATil 
OW/Wl 


000226 


MTYS: 


novo 


•1 f inFLG 


4784 


015742 


000403 








AO 


•«TTC 


^ "VAC 

4 765 


013744 


1 1 ^^^^ 


UOU\A/l 


000220 


♦ATY4: 


novo 


•I.IFFLG 


M TAX. 

4 rOo 


013732 








•ATYC: 






4 fO r 


013 752 


010046 








nov 


OA ^ CO ^ 
H0» -ISr' J 


4 780 


013754 


#\4 A« 

010146 








MAii 

nov 


0« /CON 

Hi, -ISrJ 


4 f BTf 


013 


105767 


OOOcvO 






ISTB 


•MFLG 


4 f 1W 


013 762 


AKA 

001450 








DCA 


5* 


4 f Tfi 


t\% V7X.^ 

013764 


122767 




165222 




Crm 


♦APTtNV , f CNV 


4 l^i 


013772 


001031 








BNc 


91 


4 f ^3 


013 774 


132767 


OOUIWI 


105219 




DTTO 

dITd 


AAOTCOAAi ACklUM 

•APTSPOOL ( SENVn 


* r^P* 


014O02 


AA1 A OC 

001425 








OCA 

Bed 


59 


4 f TO 


A t A^^A 


017600 


<WW>4 






MAU 

nov 


AA f CO > OA 




014010 


062766 




000004 




AAA 

ADD 


#2,41 SP) 


A707 


f\ • A^% A. 

014016 


0O5767 






1<: 


T5T 


A MC^T VOC 


ATOM 

4 f 


0140Z2 


001975 








BNc 


1* 




f\% AtV%A 

014024 


Al iW^7 

010067 


&09XDV 






nov 


OA AMCf^AA 

ROt VnSuAO 




0I4O9O 


105 720 






21: 


TCTB 

TSTo 


\.mOj* 




014052 


^At V7^ 

0013 7D 








one 


OA 

21 




014034 


166 700 


X03X3V 






ei u 
SUo 


AMC/*AA OA 

fnSbAO,f«0 




014040 


006200 










OA 

RO 




014042 


A1 ^^^7 

OlOOo 7 


l^gl AA 

XOjX" 






nov 


OA AMC/^ f*T 

NO , f nStoLbl 




014040 


A1 07^7 

012 'Or 


<VWVM4 


1 ACI OA 

165120 




nov 


•4, inSuTYPt 




014<04 


000415 








BR 


5V 




014056 


A1 7X^7 

01 7667 




A^^AI A 

000016 


5t: 


MAii 

nov 


OA / CO > At 




014064 


062 766 


UUUUUc 


000004 




ADD 


AO AfCD\ 

#2,415*' J 


4ilAQ 


0140 72 


A1 £7AA 

016 74e 


XOd f\AI 






nov 


f 7777X. tCO\ 

177776, -iSr J 




014076 


t^\A 7^7 

004 76 7 


X f 0900 






ICO 


O^ A TVOC 

rC» •TYPE 


4At 1 
'Oil 


0141% 


oooooo 






41: 




0 




A1 A 1 AA 

014104 








51: 






'OX J 


014104 


105767 


OOOOOc 




10* : 


TCTO 

■ STB 


•rr Lb 


MIA 




At A 

001416 








OCA 

Bell 


4 OA 

12* 


MIS 

'OX3 


014112 


AMK7&7 
UV376 7 


1IISA7& 
X09U 'O 








VENV 




A1 A 1 1 £ 


001413 








OCA 

BcQ 


1 OA 

12* 


Ml 7 

'OX ■ 


A1 A^ ^A 


00576 7 


XD9V3V 




11«: 


TCT 


AMC/*TvOC 

•nSGTYPE 


MIA 
'oxo 


014124 


V7C 

001975 








BNc 


1 4 A 
ill 


Ml 9 

'OX * 


A1A1 
014126 


A1 7X^7 

Ol 766 7 




165042 




nov 


AA/CO\ ACATAI 

■4(SP}, tr ATAL 


M?0 


OX4X34 


062'66 




000004 




AAA 

AOU 


AO A/CO% 

#2,41 5P J 


M91 

'OCX 


OX4142 


005267 


X03VCO 










M99 

'OC& 


014140 


10506r 






121: 


CLRB 


•FFLG 


He J 


A1 At CO 
014132 


105067 


UUUUXd 






CLRB 


♦LFLG 


'OC 


014 iS6 


105067 


uuuovo 






CURB 


♦MFLG 


4A2S 


014162 


012601 








MOV 


(SP)»,Rl 


4S26 


014164 


012600 








MOV 


(SP)*.RO 



TO REPORT FATAL ERROR 
TO TYPE A MESSAGE 

TO ONLY REPORT FATAL ERROR 

PUSH RO ON STACK 
PUSH Rl ON STACK 
SHOULD TYPE A MESSAGE? 
IF NOT: BR 
OPERATING UNDER APT? 
IF NOT: BR 

SHOULD SPOOL MESSAGES? 

IF NOT: BR 

GET MESSAGE AOOR. 

iiBUMP RETURN AOOR. 
SEE IF DONE U/ LAST XMISSION? 
IF NOT: WAIT 
PUT AOOR IN MAILBOX 
FIND END OF MESSAGE 

SUB START OF MESSAGE 
GET rESSAGE LNGTH IN WORDS 
PUT LENGTH IN MAILBOX 
TELL APT TO TAKE MSG, 

PUT MSG AOOR IN JSR LIM<AGC 
I iBUMP RETURN ADDRESS 
PUSH 177776 ON STACK 
CALL TYPE MACRO 



SHOULD REPORT FATAL ERROR? 
IF NOT: BR 
RUIMING UNDER APT? 
IF NOT: BR 

FINIStCD LAST MESSAGE? 
IF NOT: WAIT 
GET ERROR # 

iiBUrV RETURN AOOR. 
TELL APT TO TAKE ERROR 
aEAR FATAL FLAG 
aEAR LOG FLAG 
aEAR MESSAGE FLAG 
POP STACK INTO Rl 
POP STACK INTO RO 
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4827 014166 000207 

4626 014170 000 

4629 014171 000 

4630 014172 000 
46S1 014174 

4632 000200 

4633 000001 
4334 000100 
4635 000040 



RTS PC 
♦fTLC: .BYTE 0 
•LFLC: .BYTE 0 
fFFLG: .BYTE 0 

.EVEN 
APTSIZL-200 
APTENV>001 
APTSPOOL-100 
APTCSUP-040 



bfcy lid 



tiRETURN 
iiHESSG. FLAG 
( iLOG FLAG 

iiFATAL Flag 



riAIIceC -ZZ CVOVA 0 riACYll S0A(10S2) 12-JUL-a4 09:52 PAGE 116 

CVOVAO.Pll 12-JU.-64 05:04 EMOR NMOLER MUTIIC 



SEQ 116 



4636 
4837 
4836 
4839 
4640 
4641 
464;> 
4643 
4644 
4645 
4646 
4647 
4646 



.SBTTL ERROR HANDLER ROUTIIC 

!*TNIS ROUTINE MILL INCREHENT T»C ERROR FLAG AND T»C ERROR COUNT? 
i*SAVE T»C ERROR ITEM NUNKR AND T»C ADDRESS OF THE ERROR CALL 
i*AND GO TO HYTYPE ON ERROR 

i*T»C SWITCH OPTIONS PROVIDED BY THIS ROUTIIC ARE: 

>*SU15-1 HALT ON ERROR 

i*SUlS-l II64IBIT ERROR TYPEOUTS 

i*SU10-l BELL ON ERROR 

:*SU09-1 LOOP ON ERROR 

i«CALL 

t« ERROR N iiERROR-EHT AND N-ERROR ITEH NUTQER 





















4650 


014174 








lERROR: 












tnAAm 












11 TEST rOQ Pl/IMCT TN SOFT.SUt 






m^3ML7 
Xv3cO ' 


XO* r WX 




71 • 










ni4>A9 


Ml 77^ 
\^X ' 'J 












I iDON' T LET FLAG GO TQ TERO 




A1 Aao4 


01I1777 
VXO f f f 


164&7P 

XD^O 'C 


164710 

Xw^ • JV 




HDV 


iTSTNH SDISPLAV 


t t DISPLAY TEST M4MER MA EnROR El AG 




m491 9 


0X3777 
VAk f ' ' 




164790 

Xw^ ' cv 




BTT 


4BTT10 asm 

vox 1 XV c W99Kt 


1 fBELL ON ERRfM? 




U14CCV 


001 










X V 


1 iMO - SKTP 






1 A4401 


OOl 14k4 






TYPE 


•BELL 


I 1 RING RELL 








IftJf^O 
xo^^wv 




It • 

XV. 


IMC 


•ERTTL 

w wn Ilk 


t iCQLMT T^ NI#MER OE ERRORS 




0149X9 


01 1M7 


164660 






HDV 




1 tGET ADDRESS OE ERROR INSTRUCT TON 






XQc 'O ■ 


000002 


1M6V 
xu^v^c 






#9 IERRPC 






A14344 


1 1 77fc7 

X X • ' w > 


164A46 
XO^V^w 


164649 






aiEPQPC IITEHB 


11 STRIP AND SAVE T»C ERROR ITEH rODE 




m4>v 




090000 


164660 




SIT 


4BIT13 flSU) 

wOX ■ X ^ • ^wWl 


t I SKIP TYPEOUT IF SET 




vmcw 












901 


11 SKIP TYPEOUTS 




VX^CVk 


MM 7417 


1 7S^S4 








PC HYTYPE 

refill 1 1 r 1m 


1 iGO TO USER ERROR ROUlTIf 






KM401 
x\^^vx 


001171 

\M/X X > X 






TYPE 


ICRLF 




4666 


014272 








201: 










014979 
vx^« ' c 


Xcc rO > 
001007 


OOOOOl 


164714 

r A^ 




BNE 


•APTENV lENV 
21 


1 iRUMING IN APT HQDE 

1 iNO SKIP APT ERROR REPORT 


4669 


014109 
wx^^#c 


1 16767 

XXw fv' 


164606 


000004 

WWW ' 




novB 


IITEHB 211 


It SET ITEH NUMBER AS ERROR NUMBER 


4670 


014510 


004767 


177450 






JSR 


PC.IATY4 


i (REPORT FATAL ERROR TO APT 


4671 


014314 


000 






211 • 


BYTE 


0 




4672 


014515 


000 








.BYTE 


0 




4673 


014516 


000777 






22t: 


BR 


221 


iiAPT ERROR LOOP 


4674 


014520 


005777 


164614 




2t: 


TST 


8SUR 


: iHALT ON ERROR 


4675 


014524 


100002 








BPL 


51 


tiSKIP IF CONTINUE 


4676 


014526 


000000 








HALT 




liHALf ON ERROR! 


4677 


014550 


104407 








CKSUR 




iiTEST FOR CHANGE IN SOFT-SUR 


4676 


014552 


052777 


001000 


164600 


5t: 


BIT 


46IT09.8SUR 


iiLOOP ON ERROR SUITCH SET? 


4679 


014540 


001402 








BEQ 


4t 


iiBR IF NO 


4660 


014542 


016716 


164542 






HOV 


ILPERR.(SP) 


t {FUDGE RETURN FOR LOOPING 


4661 


014546 


005767 


164610 




41: 


TST 


lESCAPE 


it CHECK FOR AN ESCAPE ADDRESS 


4662 


014552 


001402 








BEQ 


51 


1 iBR IF NONE 


466S 
4664 


014554 
014560 


016716 


164602 




51: 


MOV 


•ESCAPE. CSP) 


i 1 FUDGE RETURN ADDRESS FOR ESCAPE 


4865 


014560 


022757 


012452 


000042 




CHP 


•IENDA0.8P42 


iiACT-11 AUTO-ACCEPT? 


4686 


014566 


001001 








BNE 


61 


i (BRANCH IF NO 


4867 
4666 


014570 
014572 


000000 






6t: 


HALT 




8! YES 


4669 


014572 


000002 








RTI 




i (RETURN 
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riACTii 
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L-e4 
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CVOVAO. 


Pll 


12 JUL -84 
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scope HANDLER 


ROUTINE 




All Of) 










.SBTTL 


SCOPE HANDLER ROUTINE 




4891 


















4892 
4893 










;*THZS mUTINE CONTROLS T»C LOOPING OF SUBTESTS. IT WILL INCREMENT 


4894 










s*MC LOM) T>C TEST NUMBERC ITSTttl) INTO THE OISPLAY REG.(DISPLAY<7:0> ) 


4895 










:*/M<> LOAD THE ERROR FLAG (lERFLG) INTO DISPLAY < 15 :06> 


4896 










i*T»C SWITCH OPTIONS PROVIDED BY 


THIS ROUTINE ARC: 


4897 










:*SU14- 


1 


LOOP ON TEST 




4896 










>*SU11- 


1 


IHMIBIT ITERATIONS 


4899 










:*SU09- 


1 


LOOP ON ERROR 




4900 










:*SU06- 
{•CALL 


1 


LOOP ON TEST IN 


SUR<7:0> 


4901 
















4902 












SCOPE 


1 t SCOPE - 


JOT 


490S 


















4904 


014374 








•SCOPE: 








4905 


014374 


104407 








CKSUR 




J J TEST FOR CHANGE IN SOFT-SUR 


4906 


014376 


0S2777 


040000 


164554 


1$: 


BIT 


46IT14.8SUR 


II LOOP ON PRESENT TEST? 


4907 


014404 


001114 








BNE 


•OVER 


1 iTES Ir SU14«1 


4906 










s*MMSTART OF CODE FOR T»C XOR 


It 5 1 cR##### 


4909 


014406 


000416 








OK 




;;ir RUWIIN6 ON THE "XOR" TESTER CHANGE 


4910 
















llTHIS XNSTnUlTION TO A "NOP CN0P«240j 


4911 


014410 


013746 


000004 






nuv 


cMCBOucr* f CD % 


II SAVE TrC CONTENTS Or THE ERROR VECTOR 


4912 


014414 


012737 


014434 


000004 




nuv 




II SET FOR TirtOUT 


4913 


014422 


005737 


177060 






TCT 


wwx f rODU 


llTinE OUT ON XOR? 


4914 


014426 


012637 


000004 






fW 




1 1 RESTORE THE ERROR VECTOR 


4915 


014432 


000463 








DO 




i ibO TO THE NEXT TEST 


4916 


014434 


022626 






3* : 


rim 


f CD ^ » f CD 


II CLEAR THE STACK AFTER A TIME OUT 


4917 


014436 


012637 


000004 






Mnw 




1 {RESTORE THE ERROR VECTOR 


4916 


014442 


000423 








BO 




iiLOOP ON THE PRESENT TEST 


4919 


014444 








o# : 1 i^^p 


www 




TE S TEP#M## 


4920 


014444 


032777 


000400 


164466 




RTT 




; iLOOP ON SPEC. TEST? 


4921 


0144S2 


001404 








aea 
Bcy 


21 


BA Tr kJB 

1 iBR Ir NO 


4922 


014454 


127767 


164460 


164420 






OSyR.ITSTIW 


llON THE RIGHT TEST? SUR<7:0> 


4923 


014462 


001465 








BEQ 


•OVER 


1 iBR IF YES 


4924 


014464 


105767 


164413 




2>: 


TSTB 


lERFLG 


1 iHAS AN ERROR OCCURRED? 


4925 


014470 


001421 








BEQ 


3« 


iiBR IF NO 


4926 


014472 


126767 


164417 


164403 




criPB 


•ERtlAX.^ERFLG 


iiMAX. ERRORS FOR THIS TEST OCCURRED? 


4927 


014500 


101015 








BHI 


3^ 


1 iBR Ir mJ 


4926 


014502 


032777 


001000 


164430 




BIT 


46IT09.BSUR 


i iLOUP ON ERnOR? 


4929 


014510 


001404 








BEQ 


4t 


: IBN Ir NU 


4930 


014512 


016767 


164372 


164366 


7$: 


nov 


•LPERR.^LPAOR 


1 1 X 1 LIMP WORcbb 1 U LMb 1 bL(^t 


4931 


014520 


000446 








BR 


•OVER 




4932 


014522 


105067 


164355 




41: 


CLRB 


•ERFLG 


1 • TFRO THF FBRflR PI 


4933 


014526 


005067 


164426 






CLR 


•TIMES 


iiaEAR THE NUMBER OF ITERATIONS TO MAKE 


4954 


014532 


000415 








BR 


1^ 


1 {ESCAPE TO THE NEXT TEST 


4935 


014534 


052777 


004000 


164576 


31: 


BIT 


46IT11.0SUR 


{{INHIBIT ITERATIONS? 


49S6 


014S42 


001011 








BNE 


!• 


iiBR IF YES 


4937 


014544 


005767 


164452 






TST 


•PASS 


{{IF FIRST PASS OF PROGRAM 


4936 


014550 


001406 








BEQ 


U 


i: imiBIT ITERATIONS 
{{INCREMENT ITERATION COUNT 


1939 


014552 


005267 


164326 






INC 


♦ICNT 


4940 


014556 


026767 


164376 


164520 




CMP 


•TIMES. •ICNT 


{{CHECK THE NUMBER OF ITERATIONS MADE 


4941 


014564 


002024 








BGE 


•OVER 


1 1 BR IF MORE ITERATION REQUIRED 


4942 


014566 


012767 


000001 


164310 


11: 


MOV 


•l.^ICNT 


{(REINITIALIZE t»c ITERATION COUNTER 


4943 


014574 


016767 


000052 


164356 




MOV 


•MXCNT. •TIMES 


{{SET NUMBER OF ITERATIONS TO 00 




014602 


105267 






ISVLAO: 


INCB 


•TSTNM 


{{COUNT TEST NUMBERS 


49»5 


014606 


116767 


164270 


164364 




MOVB 


• TSTrtl.^TESTN 


{{SET TEST NUMBER IN APT MAILBOX 



SEQ 117 
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4946 


014614 


011667 


164266 






MOV 


(SP).IlPAOR 


4947 


014«^ 


011667 


164264 






MOV 


(SP).ILPCIW 


4946 


014624 


005067 


164S52 






CLR 


lESCAPE 


4949 


O: 4630 


112767 


000001 


164257 




MOve 


•1 . lERMAX 


4950 


0146M 


016777 


164240 


164276 


tOVER: 


r«v 


• TSTftl. DISPLAY 


4951 


014644 


016716 


1642S6 






MOV 


•LPAOR.(SP) 


4952 


014650 


000002 








«TI 




495S 


014652 


OOS720 






<NXCNT : 


2000. 





iiSAVE SCOPE LOOP AOORESS 

iiSAVE EMOR LOOP AOORESS 

iiaEAR T»€ ESCAPE riton ERROR ADDRESS 

iiONLY ALLOU CNECl) ERROR ON NEXT TEST 

iiDISPLAY TEST NUTVER 

I iFUDGE RETURN ADDRESS 

iiFlXES PS 

tiMAX. NUrOER OF ITERATIONS 



ruilCtC IZ CVOWA D N*Cni 
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4954 
4955 
4956 
4957 
4956 
4959 
4960 
4961 
4962 
4965 
4964 
4965 

4966 014654 

4967 014654 010046 
4966 014656 010146 

4969 014660 010246 

4970 014662 010546 

4971 014664 010546 

4972 014666 012746 
4975 014672 016605 

4974 014676 100004 

4975 014700 005405 

4976 014702 112766 

4977 014710 005000 

4978 014712 012705 

4979 014716 112725 

4980 014722 005002 

4981 014724 016001 

4982 014750 160105 

4985 014752 002402 

4964 014754 005202 

4965 014756 000774 

4986 014740 060105 

4987 014742 005702 

4988 014744 001002 
4969 014746 105716 

4990 014750 100407 

4991 0147S2 106516 

4992 014794 105005 
4995 014796 116665 

4994 014764 052702 

4995 014770 092702 

4996 014774 110225 

4997 014776 005720 

4998 015000 020027 

4999 015004 002746 

5000 015006 005002 

5001 015010 010502 

5002 015012 000764 
5005 015014 105726 

5004 015016 100005 

5005 015020 116665 

5006 015026 109015 

5007 0150S0 012605 
5006 015052 012605 
5009 015054 012602 
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CONVCRT BINMr TO DCCINAL MO TTPC ROUTINE 

.SaTTL CONVERT SINMt TO OECZNM. MO TYPE ROUTZIC 



3CW 



1 ■* 



020200 
000020 



000055 000001 



015070 
000040 

015060 



t*THIS ROUTZIC ZS USED TO CHMCE A 16-BZT IZMMlY IM9ER TO A 9 DZGZT 
i*SZGNED OCCZtML (ASCZZ) NUr«ER AM> TYPE ZT. OEPEIOZNC ON WCTlCR T»C 
i«NUm» ZS ROSZTZVE OR NEGATZVE A SPACE OR A HINUS SZON MILL K TyPEO 
i«6EF0RE T»C FZRST OZGZT OF T»C NUVVER. LEA0ZN6 ZEROS MZLL M.UAYS 8E 
{•REPLACED UZTH SPACES. 
I •CALL: 
!• 
I* 



•TYPOS: 



000001 177777 

000060 

000040 



000010 



II: 

21: 
5t. 

41: 

51: 



6t: 
71: 



177777 177776 



8(: 
9t: 



HOV 


Nun. -(SP) 


1 iPUT T»€ BZNARY MUMER ON T»C STACK 


TYPOS 




ti(X) TO T»C ROUTZNE 


nov 


RO, -(SP) 


iiPUSH RO ON STACK 


NOV 


Rl. (SP) 


J iPUSN Rl ON STACK 


NOV 


R2. (SP) 


1 iPUSH R2 ON STACK 


NOV 


R5. -(SP) 


1 iPUSH R5 ON STACX 


NOV 


R5. -(SP) 


tiPUSH RS ON STACK 


rw 


•20200. -(SP) 


II SET BLM#( SUZT&I MO SZ(M 


NOV 


20(SP).R5 


tiGET T»C ZI^UT NUNBER 


BPL 


11 


iiBR If ZI9UT ZS POS. 


NEC 


R5 


iiNAKE TIC BDMAY NUWER PCS. 


NOVB 


-.l(SP) 


iiMKE TIC RSCZZ NUNBER NEC. 


CLR 


RO 


II ZERO TIC CONSTANTS ZNOEX 


NOV 


#I08LK.R5 


11 SETUP TIC OUTPUT POZNTER 


NOVB 


•' .(R5)* 


II SET TIC FZRST CHARACTER TO A BLAM< 


CLR 


R2 


tiCLEAR TIC BCD NLTVER 


NOV 


•DTBL(R0).R1 


iiGET Tic CONSTANT 


SUB 


R1.R5 


iiFORN THZS BCD DZGIT 


BLT 


41 


iiBR ZF DONE 


ZNC 


R2 


iiZNCREASE TIC BCD DIGIT Br 1 


BR 


5» 




AOD 


R1.R5 


11 AOD BACK TIC CONSTANT 


TST 


R2 


iiOCCK ZF BCD DZGIT -0 


BNE 


51 


llFALL TMIOUQH IF 0 


TSTB 


(SP) 


iiSTZLL OOZNG LEADZNG OS? 


BHZ 


71 


IiBR ZF YES 


ASLB 


(SP) 


tiNSD? 


BCC 


61 


iiBR ZF NO 


NOVB 


1(SP).-1(R5) 


11 YES- -SET THE SZGN 


6ZS 


•'0.R2 


1 iNAKE THE BCD DZGZT ASCZI 


BZS 


.R2 


llNAKE ZT A SPACE ZF NOT ALREADY A DIGIT 


NOVB 


R2.(R5)* 


iiPUT THZS CHARACTER ZN TIC OUTPUT BUFFER 


TST 


(RO)* 


II JUST ZNCRENENTZNG 


or 


R0.*10 


iiCHECK TIC TABLE IIOEX 


BLT 


21 


tiGO 00 TIC NEXT DIGIT 


BGT 


81 


liGO TO EXIT 


NOV 


R5.R2 


iiGET TIC LSD 


BR 


6t 


iiGO CHANGE TO ASCII 


TSTB 


(SP)» 


iilMS TIC LSD TIC FIRST NON-ZERO? 


BPL 


91 


iiBR ZF NO 


NOVB 


-1(SP).-2(R5> 


11 YES- -SET TIC SIGN FOR TrPZNG 


aRB 


(R5) 


11 SET TIC TERNXNATOR 


NOV 


(SP)*.R5 


1 iPOP STACK INTO R5 


NOV 


(SP)..R5 


1 iPOP STACK ZNTO R5 


NOV 


(SP)*.R2 


iiPOP STACK ZNTO R2 
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5010 


015036 


012601 






MOV 


(SP)» ,Pl 


1 iPOP STACK INTO fll 


5011 


015040 


012600 






MQV 


(SP)* .RO 


1 J POP STACK INTO RO 


5012 


015O42 


104401 


015070 




TYPE 


. I06LK 


ilNOU TYPE THE NUMBER 


5015 


015046 


016666 


000002 000004 




MOV 


2( SP).4(SP) 


II AO JUST THE STACK 


5014 


015054 


012616 






MOV 


( SP ) ♦ , ( SP ) 




5015 


015056 


000002 






pti 




1 iRETURN TO USER 


5016 


015060 


025420 




IDTBL : 


10000. 






5017 


015062 


001750 






1000. 






5010 


015064 


000144 






100. 






5019 


015066 


000012 






10. 






5020 


015070 


000004 




tOSLK: 


.BLKU 


4 
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:>cu It:: 



5021 
5022 
5025 
5024 
5025 
5026 
5027 
5026 
5029 
5050 
5051 
5052 
5055 
5054 
5055 
5056 
5057 
SOM 
5059 
5040 



.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 



•THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUTQER TO A 6-OIGIT 
•OCTAL (ASCII) NUrOER AND TYPE IT. 

•ITYPOS-- -ENTER «Re TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 



•CALL: 



HOV N'jri.-(SP) iiNUMBER TO BE TYPED 

• TYPOS J I CALL FOR TYPEOUT 

• .BYTE N »»N-l TO 6 FOR NUTfiER OF DIGITS TO TYPE 

• .BYTE H iiH-I OR 0 

• iil-TYPE LEADING ZEROS 

• iiO-SUPPRESS LEADING ZEROS 
* 

•ITYPON ENTER »€RE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

•ITYPOS OR tTYPOC 



•CALL: 



MOV 
TYPON 



NUH,-(SP) 



I iNUMBER TO BE TYPED 
mCALL for TYPEOUT 



•ITYPOC-- -ENTER »€RE FOR TYPEOUT OF A 16 BIT NUMBER 

I iNUMBER TO BE TYPED 
mCALL FOR TYPEOUT 

iiPICKUP T»C MODE 
iiLOAD ZERO FILL SWITCH 
iiNUrOER OF DIGITS TO TYPE 
1 1 ADJUST RETURN ADDRESS 



5042 










( •CALL : 






5045 










1 • 


MOV 


NUH.-(SP) 


5044 










1 • 


TYPOC 




5045 
















5046 


015100 


017646 


000000 




♦TYPOS: 


MOV 


8(SP).-(SP) 


5047 


015104 


116667 


000001 


000211 




MOVB 


l(SP).tOFILL 


5046 


015112 


112667 


000207 






MOVB 


(SP)*.tOMODE*l 


5049 


015116 


062716 


000002 






ADO 


•2.(SP) 


5050 


015122 


000406 








BR 


•TYPON 


5051 


015124 


112767 


000001 


000171 


•TYPOC: 


MOVB 


•I.IOFILL 


5052 


015132 


112767 


000006 


000165 




MOVB 


•6.tOHOOE*l 


5055 


015140 


112767 


000005 


000154 


ITYPON: 


MOVB 


•5.I0CNT 


5054 


015146 


010S46 








MOV 


R3.-(SP) 


5055 


015150 


010446 








MOV 


R4..(SP) 


5056 


01S1S2 


010546 








MOV 


R5.-(SP) 


5057 


015154 


116704 


000145 






MOVB 


I0H0DE*1.R4 


5056 


015160 


005404 








NEG 


R4 


5059 


015162 


062704 


000006 






ADO 


•6.R4 


5060 


015166 


110467 


000132 






MOVB 


R4.I0M0DE 


5061 


015172 


116704 


000125 






MOVB 


»0FILL.R4 


5062 


015176 


016605 


000012 






MOV 


12(SP).R5 


5065 


015202 


005005 








CLR 


R3 


5064 


015204 


006105 






It: 


ROL 


R5 


5065 


015206 


000404 








BR 


5» 


5066 


015210 


006105 






2»: 


ROL 


R5 


5067 


015212 


006105 








ROL 


R5 


5068 


01S214 


006105 








ROL 


R5 


5069 


015216 


010503 








MOV 


R5.R3 


5070 


015220 


006103 






51: 


ROL 


R3 


5071 


015222 


105367 


000076 






DECB 


lOMOOE 


5072 


015226 


100016 








BPL 


7» 


5075 


01S2S0 


04270^ 


177770 






BIC 


#177770. R3 


5074 


015234 


001002 








BNE 


4» 


5075 


015236 


005704 








TST 


R4 


5076 


015240 


001403 








BEG 


5t 



iiSET T»€ 
iiSET FOR 
iiSET T« 
iiSAVE R5 
I (SAVE R4 
iiSAVE R5 
itGET T»€ 



ZERO FILL SWITCH 
SIX(6) DIGITS 
ITERATION COUNT 



NUreER OF DIGITS TO TYPE 



1 1 SUBTRACT IT FOR MAX. ALLOWED 

IiSAVE IT FOR USE 

iiGET T»C ZERO FILL SWITCH 

IiPICKUP T»C I»^T NUMBER 

1 1 CLEAR T»C OUTPUT WORD 

1 1 ROT ATE MSB INTO "C" 

iiGO DO MSB 

I iFORM THIS DIGIT 



iiGET LS6 OF THIS DIGIT 

1 1 TYPE THIS DIGIT? 

iiBR IF NO 

t iGET RID OF JUNK 

II TEST FOR 0 

1 1 SUPPRESS THIS 0? 

liBR IF YES 
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5077 


015242 


005204 




4$ : 


INC 


M 


5078 


015244 


052705 


000060 




BIS 


♦'0,R3 


5079 


015250 


052703 


000040 


5»: 


BIS 


#• .R3 


5060 


015254 


110567 


000040 




wove 


R5,8» 


5061 


015260 


104401 


015520 




TYPE 


.8t 


5062 


015264 


105567 


000C32 


7»: 


OECB 


♦OCNT 


5063 


015270 


003347 






9GT 


2$ 


5064 


015272 


002402 






BLT 


61 


5065 


015274 


005204 






INC 


R4 


5066 


015276 


000744 






BR 


21 


5067 


015500 


012605 




6(: 


MOV 


(SP)».R5 


5066 


015502 


012604 






MOV 


(SP)*.R4 


S069 


015304 


012603 






MOV 


(SP)*.R3 


5090 


01SS06 


016666 


000002 000004 




MOV 


2(SP).4(SP) 


5091 


015314 


012616 






MOV 


(SP)»,(SP) 


5092 


015316 


000002 






PTI 




509S 


015320 


000 




8t: 


.BYTE 


0 


5094 


015321 


000 






.BYTE 


0 


5095 


015322 


000 




•OCNT: 


• BYTE 


0 


5096 


015325 


000 




♦OFILL: 


.B^TE 


0 


5097 


015324 


000000 




lOHOOE: 


.UORO 


0 



lOGN'T SUPPRESS ANYMORE 0' S 

iMAKE THIS DIGIT ASCII 

I MAKE ASCII IF NOT ALREADY 

I SAVE FOR TYPING 

I GO TYPE THIS DIGIT 

I COUNT BY 1 

iBR IF MORE TO DO 

iBR IF DONE 

I INSURE LAST DIGIT ISN'T A BLANK 
iGO DO T»€ LAST DIGIT 
I RESTORE R5 
I RESTORE R4 
I RESTORE R3 

I SET THE STACK FOR RETURNING 
t RETURN 

iSTORAGE FOR ASCII DIGIT 

I TERMINATOR FOR TYPE ROUTINE 

{OCTAL DIGIT COUNTER 

I ZERO FILL SWITCH 

I NUMBER OF DIGITS TO TYPE 
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SEQ 123 



509« 






5099 






5100 






5101 






5102 






5105 






5104 






5105 






5106 


015326 


010046 


5107 


015330 


016600 


5106 


015334 


005740 


5109 


015336 


111000 


5110 


015540 


006500 


5111 


01S542 


C16000 


5112 


015546 


000200 


511S 






5114 






5115 






5116 






5117 


015550 


011646 


5118 


015552 


016666 


5119 


015560 


000002 


5120 






5121 






5122 






5123 






5124 






5125 






5126 






5127 






5128 


015562 


015550 


5129 


015564 


012670 


5' V 


015566 


015124 


5*51 


015570 


015100 


5152 


015572 


015140 


5133 


015574 


014654 


5134 






5135 


015376 


013222 


5136 






5137 


015400 


015152 


5136 


015402 


013434 


5139 


015404 


013554 


5140 




000001 



i«THIS ROUTINE WILL PICKUP THE LOICR BYTE OF THE "TRAP" INSTRUCTION 
(•AM) USE IT TO IM>EX T»«OUGH T»C TRAP TABLE FOR T»€ STARTING ADDRESS 
i*0F T»€ DESIRED ROUTINE. T»CN USING T»€ ADDRESS OBTAINED IT WILL 
i*GO TO THAT ROUTINE. 





nuv 


RO.-(SP) 


iiSAVE RO 




nuv 


2(SP).R0 


iiGET TRAP ADDRESS 




TST 


-(RO) 


1 {BACKUP BY 2 




novB 


(RO).RO 


It GET RIGHT BYTE OF TRAP 






RO 


1 iPOSITION FOR INDEXING 




MOV 


ITRPAO(RO),RO 


iiIICEX TO TABLE 




RTS 


RO 


II GO TO ROUTINE 


mTHIS 


IS USE 


TO HANDLE THE "GETPRI" NACRO 


•TRAP2: 


nov 


(SP).-(SP) 


itHOVE THE PC DOUN 




nov 


4(SP).2(SP) 


1 {MOVE TIC PSU DOUN 




RTI 


iiRESTORE THE PSU 


.SBTTL 


TRAP 


TABLE 





i*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
t«8V THE "TRAP" INSTRUCTION. 



I 

ITRPAD: 



ROUTINE 

.UORO 

•TYPE 

•TYPOC 

•TYPOS 

•TYPON 

•TYPOS 



tTRAP2 
nCALL-TYPE 
I iCALL-TYPX 
II CALL-TYPOS 
iiCALL-TYPON 
t tCALL-TYPOS 



TRAP* 1(104401) 
TRAP*2( 104402) 
TRAP* 5(104405) 
TRAP*4(104404) 
TRAP«5( 104405) 



TTY TYPEOUT ROUTINE 

TYPE OCTAL NUrOER (UITH LEADING ZEROS) 
TYPE KTAL NUMBER (NO LEADING ZEROS) 
TYPE KTAL NUMBER (AS PER LAST CALL) 
TYPE DECIMAL NUr«ER (UITH SIGN) 



IGTSUR iiCALL-GTSUR TRAP *6( 104406) GET SOFT-SUR SETTING 



.END 



•CKSUR iiCALL-CKSUR 
•ROOM liCALL-ROCHR 
•RDLIN itCALL-RDLiN 



TRAP* 7(104407) TEST FOR CHANGE IN SOFT-SUR 
TRAP* 10(104410) TTY TYPEIN CHARACTER ROUTINE 
TRAP*11( 104411) TTY TYPEIN STRING ROUTINE 
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SEQ 124 



ABASE • 
ACDUl - 
ACDIC - 
ACPUOP- 
ADORES 
AOOUO - 
AOOWl - 
AOOWIO- 
AOOUll- 
A00U12- 
A00U15- 
A00W14- 
AD0U15- 
A00U2 • 
A00U3 • 
A00W4 • 
A00W5 - 
A00U6 - 
A00W7 • 
ADOUa • 
A00U9 - 
AOevCT- 
AOeVM • 
AENV • 
AENVM - 
Af ATAL- 
ATMORl- 
ArM0R2- 
AMAORS- 
AnA0R4- 
AfWISl- 

AnAns2- 

AfWISS- 

AI1AnS4* 

AMSGAD- 

AMSGLG- 

AHSGTY- 

AMTYPl- 

AmYP2- 

AMTYPS- 

AMTYP4- 

APASS - 

APRIOR* 

APTCSU- 

APTENV- 

APTSIZ- 

APTSPO- 

ASUREG- 

ATESTW- 

AUNIT . 

AUStft • 

AVECTl- 

AVECT2- 

8AO0RK 

BAUD * 

BAUDRA 



17S610 
000000 
000000 
000000 
012556 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

oooooo 

000000 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

000001 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

000040 

000001 
000200 
000100 

oooooo 
oooooo 
oooooo 

071110 
000300 

oooooo 

011326 
007400 
007210 



1# 

1017 

1017 

1017 

4440* 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1017 

1* 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
1017 
4591 
2697 
1126 
4566 
1017 
1017 
1017 
1# 
1* 
1017 
4114* 
921« 
3320* 



1017 



1056 



1032 

4451* 4461 



1023 
1017 
1028 
1029 
1020 
1045 
1049 
1052 
1055 
1039 
1047 
1050 
1053 
1025 
1026 
1019 
1040 
1046 
1051 
1054 
1022 

4635* 

2906 
4652« 

4793 

1030 
1021 
1024 
1017 
1017 
1057 



4466» 



1059 



3163 
4634« 



1031 
1056 



3647 



4564 



4791 



4633* 4667 
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SEQ 125 



BITMAS 


012S52 


4417 


4456* 


4449* 


A A A ^ 

4457 


A AX X A 

44666 




BITO • 


000001 


796# 












BITOO ■ 


000001 


786* 


796 


865 


AAX. 

606 


AAT 

907 




BITOl • 


000002 


785# 


YAK 

795 


844 


AAA 

864 


AAX 

906 




BIT02 • 


000004 


7tt4# 


^AA 

794 


AAV 

645 


A^ V 

863 


AAA 

884 


AAA 

905 


BIT03 • 


000010 


785# 


793 


A A ^ 

842 


AX 

862 


904 




BIT04 " 


000020 


7824 


792 


861 


AAV 

903 






BIT05 • 


000040 


7814 


Y A • 

791 


AAA 

840 


AX A 

860 


AA^ 

902 




BIT06 ■ 


000100 


7804 


790 


839 


ACO 


800 


AA4 

901 


BIT07 ■ 


000200 




^ Aa 

789 


836 


ACA 

850 


A70 

879 


AAA 

900 


BIT06 > 


000400 


7784 


^ A A 

788 


4920 








BIT09 • 


001000 


7774 


787 


A A ^ A 

4878 


A AAA 

4928 






BITl • 


000002 


7954 












BITIO - 


002000 


7764 


A VK 

855 


A AAA 

4855 








BIfll • 


004000 


7754 


A V A 

054 


a ^A 

874 


A AAA 

4955 






BIT12 - 


010000 


77A# 


095 


853 


AYV 

675 






BITIS - 


020000 


7754 


832 


852 


A 

872 


A AX A 

4862 




BIT14 " 


040000 


AA 

7724 


A V ■ 

831 


AA 4 

851 


A V« 

071 


4906 




BIT15 ■ 


100000 


771# 


850 


ACA 

850 


A 

670 






BIT2 


000004 


79## 












BI • 3 " 


000010 


795# 












BIT4 ■ 


000020 


7924 












BITS • 


000040 


7914 












BIT6 ■ 


000100 


7904 












BIT7 • 


000200 


7894 












BITS ■ 


AAA A AM 

000400 














BIT9 ■ 


A^ • AAA 

OCIOOO 


7o7# 












BPTVtC" 


000014 


AAV A 

8054 












BREAK • 


000001 


806# 


1272 


4 AAA 

1285 


4 AAA 

1200 


4 9AA 

1502 


4 AAA 

1305 


BRK 


010000 


9224 


1260 


A Af A 

4064 










A^kAAAA 

020000 




1996 


20D0 


^4 A 4 

2141 


'%'%VA 

2250 


AA4 A 

2519 




010000 


AW A 


2075 


AAAg 

2095 


^4 4 K 

2115 






CKSW ■ 


• A^ A A^ 

104407 


4051 


4877 


A AAA 

4905 


K4 

51574 






CLR • 


JMkAAAA 

000000 


824# 


AAA ^ 

2916 


A 4 a4 

4191 








CLVcSCN* 


020000 


3324 


2164 


A4 AA 

2104 


AAAA 

2204 






COHSrO" 


000100 


9164 












Cm • 


000015 


7114 


A ^ VA 

4650 


A^ A A 

4640 








CHLF • 


000200 


712* 


« « AA 

1152 


A 4 AA 

4129 


4572 


AX A4 

4601 


AX A A 

4640 




012224 


1157 


44054 










DATA ■ 


AAAA« ^ 

000017 


A4 

9154 


4275 


4276 








□AT Alt" 


AAAA^ A 

000040 


A AAA 

8404 


1759 


4 9AA 

1752 


• ^KA 

1755 


4 ^XA 

1769 


1772 


DATAIw" 


100000 


A W AA 

8304 


« A^ JC 

1966 


AA A V 

2445 


AAX 4 

2461 


AA YA 

2470 


A A AY 

2467 


f\ATi ur 
DATLNb 


011652 


V^ A^ 

5656 


3762 


VAC Y 

5057 


42576 






WISP ■ 


177570 


74 AA 


99B 


4 4 4 £ 

\116 








nTCAl A 

Dla^A 


iW%4 4 A 

001142 


9984 


4 4 4 ^ A 

1116* 


4 4 ^A A 

1124* 


A AAA A 

4094* 


A AAA 1 

4950* 




DISt'Ht 


AAA* 

000174 


nw A 


1124 










DLAOD 


001254 


« a^aa 

10784 


4 4^4^ 

1161* 


4 4 £^ 

1166 


4 4 X A 

1169 


4 4 ^4 

1171 


4 4 *f A 

1174 


DLAOUH" 


175610 


8204 


fl A^A 

1076 


4 AAA 

1060 


4 AA 4 

1081 


4 AA'^ 

1062 


4 AAV 

1065 


DLVct 


AA4 

001256 


10794 


4 4 ^ A ^ 

IIM* 


WKA 


VA A A 

5440 


5472 


A V 

5625 


05HN ■ 


177570 


7174 


997 


f 4 4 C 

1115 








OlH ■ 




AAA M 

8444 


4 C 4 A 

1518 


1521 


1555 


1557 


4 CCA 

1550 






2451 


2459 


2465 
















IIUO* 








ERRCNT 


011026 


3905* 


3927 


3933 


39494 


4016 


4027* 


ERROR - 


100000 


8504 


3064 


3148 








ERRVEC- 


000004 


7994 


lllS 


1114* 


1125* 


«911 


4912* 



1319 
2410 



1324 

2510 



4082 
2614 



3560 3742 



1786 
2544 



1177 
1084 
3080 

1553 



1791 
2560 



1100 
4136 

2072 



3573 
2591 



1196 
4390 

2092 



3504 3617 
2651 2673 



1228 4130 4392 



2112 2161 2181 2201 



4914* 4917* 
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EVENOO- 


000040 


915# 




FALSE • 


000000 


4172# 


4179 


FLAG 


011644 


4179* 


4206* 


FRERR - 


020000 


SS2* 




FRFO - 


040000 


924* 


1507 


GNS 


****** u 


932 


1151 




5132 


5133 


GTSUR ' 


104406 


1146 


51354 


HOLD 


011072 


3966* 


3969* 


HOLOSC 


011645 


4191* 


4196* 


HOM-ON- 


000000 


4151« 


4177 


MT 


000011 


709# 


4599 


I 


001272 


1065« 


1205* 


iLLfCH- 


000004 


811* 


1200 


INITFL 


012354 


1154* 


4420 


INTFLA 


012040 


1212* 


1217 






4361* 


4364* 


INTSRV 


012032 


1201 


3358 


lOTVEC- 


000020 


804* 


1097* 


LF 


000012 


710# 


4634 


LOOP 


001744 


1155* 


4145 


HATNT - 


000004 


884# 


1348 






3544 


3645 


riASK - 


000000 


4258# 


4272* 


MAX 


006422 


2942 


2946 


MY TYPE 


012042 


4367* 


4864 


ICU 


007242 


3219* 


3221* 




011030 


3925 


3950* 


NUHM) 


011746 


4274* 


4275 


XD 


007246 


3192* 


3194* 


OREfW - 


040000 


851* 


3066 


PARITY - 


000020 


914* 




PB«UDS- 


004000 


874* 




P8AU00- 


010000 


873# 




PeAUOl- 


020000 


e72# 




PeAU02- 


040000 


871# 




PBAU05- 


100000 


870« 




PW 


000200 


917# 


3174 


PERR - 


010000 


855« 




PIRO - 


177772 


716# 




PIROVE- 


000240 


610« 




PRO 


000000 


733# 


3368 


Pfll 


000040 


734* 




PR2 


000100 


735* 




PR5 


000140 


736# 




PR4 


000200 


737# 




PR5 


000240 


7S8« 




PR6 


000300 


739# 




PR7 


00034C 


740# 


1202 


PS 


177776 


713# 


714 


PSW 


177776 


714# 




PWRVEC- 


000024 


805# 


1103* 


RATES 


007170 


3210 


3289 


RBUF 


001262 


1081* 


1171* 






3698 


3765 


RCSR 


001260 


1080* 


1169* 
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4211 


4234 


42464 






1574 
4128 
5135 


2050 
4134 
5137 


2141 
4140 
5138 


2230 
4371 
5139 


2410 
4377 


3972 
4202 


3985* 
42474 








4640 

1226* 

1236 

4423* 

SS46* 


1229 

44674 

3386 


1231 
3390 


4280* 
3412* 


4283* 
3428 


3473 

1096* 

4640 


43514 








1361 
3729 
4288* 
30214 


1364 
3752 
4290* 


1378 
3911 
4295* 


1361 
4073 


1395 


3237* 
3975 
4277* 
3248 

3105 


3239* 

4033 

4285 

3256 

3133 


3248 

42984 

3258 


3256 
3276* 


3258 
3278* 


3417 


3489 


3576 


3649 


3755 


1420 


2421 


2521 


2624 


3359 


1104* 

3294* 

1172* 

3802 

1518* 


4520* 

2883 
4003 
1521 


4521* 

2953 
4077 
1535* 


4530* 

3008 
4103 

1537 


4536* 

3062 
1550* 



SEQ 126 

2510 

4364 4390 4396 5129 5130 5131 
4285 

3480* 3522 3526 3570* 3596 3600 

1400 2789 2848 2914 3196 3483 

3276 3278 3326* 
33274 



3874 

3474 3885 3891 

4548* 4549* 

3105 3133 3148 3207 3518 3660 

1553 1587 1600* 1603 1617* 1620 
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1634* 


1639 






1772 


1786* 






2072* 


2075 






2254 


2271» 






2443 


2459* 






2633* 


2635 






2974 


2994 






3619« 


3691 


RCVRAC- 


004000 


as4« 


2011 


RCVROO- 


000200 


S36* 


1901 






4090 




RCVRIE* 


000100 


839« 


1815 


ROATAO> 


000001 


86S« 




ROATAl' 


000002 


664* 




R0ATA2- 


000004 


663* 




R0ATA5- 


OOOOlO 


662* 




R0ATA4* 


000020 


661* 




R0ATA5- 


000040 


660« 




R0ATA6- 


000100 


859# 




R0ATA7- 


000200 


856* 




ROCHR • 


104410 


4753 


5138* 


ROLIN • 


104411 


5139# 




REC 


011076 


3883 


3995# 


REG 


000004 


4151* 


4175 


RCGSAV 


011640 


4175» 


4166 


RCQSEN* 


000004 


84 3« 


1587 






2563 


3561 


RESVEC- 


000010 


800* 




m.0 


011166 


4007* 


4006* 


RING - 


040000 


831* 


2254 


R0050 


007170 


3S03« 




R0070 


007171 


3304* 




ROllO 


007172 


3305# 




R0135 


007173 


3306« 




ROISO 


007174 


3307* 




R0200 


007177 


3310« 




R0300 


007175 


330e« 




R060C 


007176 


3309* 




RIOOOO 


007207 


3318« 




P1600 


007200 


3511* 




R2000 


007201 


3312* 




R240C 


007202 


3S1S« 




RS600 


007203 


3314* 




R4800 


007204 


3315* 




R5STAC 


001534 


1087* 


1183 


R72O0 


007205 


3316* 




RS«0O 


007206 


3317* 




se 


011032 


3951* 


4020* 


SECREC- 


002000 


835* 


2342 


SECXhl- 


000010 


842* 


1663 






2665 




SET 


177777 


823« 


2719 






4196 




SCTCLR- 


000006 


4151« 


4202 


SPECIA 


012254 


4430« 


4511 


STACK - 


001100 


704* 


1095 
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1663 


1676* 


1679 


1693* 


1696 


1791 


1615 


1626* 


1631 


1645* 


2092* 


2095 


2112* 


2115 


2161* 


2274 


2291» 


2294 


2339* 


2342 


2461 


2470 


2465* 


2487 


2532* 


2643* 


2651 


2665* 


2673 


2604 


3011 


9227 


3486* 


3503 


9510* 


3794 


3918* 


3944* 


4037* 


4069 


2928 


2967 


2974 






2805 


2829 


2664 


2666 


2971 


1828 


1831 


1645 


1646 


1662 


4244* 










1600 


1603 


1617 


1620 


1634 


3586 


3619 








4012 


4020 


4045* 






2274 


2294 








2362 


2362 








1676 


1679 


1693 


1696 


1710 


2762 


2603 


2662 


2931 


2940 



SEQ 127 



1710* 


1715 


1739 


1752* 


1755 


1769* 


1646 


1662* 


1667 


1901 


1966 


2011 


2164 


2161* 


2184 


2201* 


2204 


2251* 


2359* 


2362 


2379* 


2382 


2431* 


2440 


2541 


2544 


2560* 


2566 


2563* 


2591 


2629 


2663 


2666 


2926 


^967 


2971 


9547* 


9573* 


9561* 


3564* 


3566* 


3617* 


2994 


3011 


3227 


3504 


3692 


3795 


1667 


3466 


3510 


3547 


3918 


4037 


1639 


2251 


2271 


2291 


2532 


2560 


1715 


2339 


2359 


2379 


2633 


2643 


3502 


3677 


3690 


3761 


3793 


4068 



NAIWCC 


-27-CVOVA 0 


HACYll 


CVOVAO.Pll 12-JU.-a4 


09 -04 


STAR 1 


001396 


936 


C Tl#l MT ■ 

3 1 KLn 1 ■ 


I f f f f ^ 


715# 






997# 






4074 




/WV\1 7JL. 


934* 


swo ■ 


OOOOUl 


766* 


SWOU ■ 




75e# 


bmOl ■ 




757# 


SU02 ■ 




756* 


SWOO ■ 




755# 






7S4# 






753* 


SM06 




752* 


SMIf ■ 


AMkSAA 


751# 


Sli06 




7S0# 


ClMB ■ 
5MW " 


AA1 AAA 


749* 


CLiI m 


000002 


767# 






74»# 


Ciil 1 B 




74 7# 


SWXc 


A1 AAAA 


746* 




A3AAAA 


745# 


CUI A m 




744* 


CUI S B 


1 /VIAAA 


743* 


■ 

9MC ■ 




766« 


CMX ■ 
3tfO ■ 




765* 


CLIA ■ 


AAfWtSA 


764* 


CU^ ■ 
3lO ■ 




763# 


CIA ■ 


fVIAI AA 


762# 


QU7 a 
f ■ 


/W>A>AA 


^61* 


CUM a 


AAAAAA 


760* 


CUQ a 


AA1 AAA 


7S9* 


TRTTWPa 


IWUWX4 


801* 




AAI 37A 


1064* 






3666* 




AA1 


1062* 






I37e« 






2749 






3729« 


TrCOMT 




1063* 


1 L/ ^ 1 




907* 




A<V1AA? 


906* 






905* 






904« 


THATAA a 


AAAA3A 


903* 


TrMITA<(a 




902* 


TflATAAa 

1 1 


(VlAI AA 


901* 


TDATATa 




900# 


TTMF • 


A<WW^ 


4307* 


1 xr^R 


A 1 1 A 7A 


2723 






4177« 






SOM 




\AAA^O^ 


609* 


TPAN 


0110S4 


3689 


TR/IPVE- 


OOOOM 


607* 


TPTVCC- 


000014 


602# 


TRUE • 


000001 


4171» 
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1066* 4553 



1093 


1115* 


1117 


1123* 


4676 


4906 


4920 


4922 


1123 


1144 


4650 


4665 


766 








767 








766 








765 








764 








763 








762 








761 








760 








759 








1180« 


1181* 


2715* 


2744* 


5790* 


5972* 


4085* 




1174* 


1175* 


1272 


1285* 


1561 


1595* 


1400 


1450 


2765 


2789* 


2848* 


2914* 


5752* 


5782 


5911* 


5915* 


1177* 


1178* 


5210* 


5289* 


4516 








2766 


2607 


2866 


5506 


4213 


4224* 


4245« 




5960* 








1101* 


1102* 






4206 


4211 


4254 





151 

USER STHBOLS 



1130* 1144 4526 4541* 4650 4667* 4655 4662 
4926 4935 



2796* 2856* 2924* 5042* 5052* 5124* 5216* 5496* 

1288 1502* 1505 1519* 1324 1346 1361* 1364 

1445* 1446 1460* 1463 1477* 1462 1934 2720 

5196* 5565* 3575* 3415* 3463* 5544* 5645* 5676 

5942* 5979* 4073* 4062* 



5661 



5694 3765 3797 4092 41504 



NAI»AEC 


•ZZ -CVDVA 


0 


MACYll 


SOA( 1052) 


12-JUL 


84 09 : 52 PAGE 


152 








CVOVAO.Pll 12 


■JUL-S4 


05:04 




CIHKS REFERENCE 


T4«LE 


USER SYr«OLS 






TCT 1 

■ 911 






1192# 


















TCT1 n 


\^/9^X« 




I73l# 


















> 9 I 11 






1607# 


















TCT 1 3 
I 9 I Ic 


\M/9 ' 




1890# 


















TCT1 ^ 






192 3# 


















TCT1 A 

1 9 1 






1956# 


















TCT 1 <4 






1990# 


















TCTIJk 
I 9 1 lO 






2001 


2045# 
















TCT1 7 
1 9 > 1 ' 


004P76 




2057 


2136# 
















TCT3 
1 9 I e 






1255# 


















TCT50 
1 9 1 cV 


0OA4S6 




2146 


22254 
















TCT31 
1 9 I Cl 






2236 


23144 
















TCT33 
I 9 1 CC 






2324 


24054 
















TCT^X 
1 9 Ic9 






2416 


25054 
















1 9 1 






2516 


2600 


26094 














TCT9S 

19 1 






2619 


26914 
















TCT>6 






2701 


27634 
















TCTP7 






2842# 


















TCT5 

1 9 > J 






1264 


13394 
















TCT SO 






2900* 


















TCT51 






2910 


2956 


2983 


3020 


30304 












006670 




3075 


3095 


3113 


3143 


3156 


31704 














3178 


3187 


3292 


33414 














007^3C 




3465# 


















TST55 


VA VA ^C> 




3565 


36404 






















3720 


37364 
















TST57 


010614 




3747 


3620 


38404 














TST4 






1416# 


















TST40 






3651 


3947 


40604 
















OllSSft 




4068 


4113 


41244 














TST5 






1S0S« 


















TST6 






1511 


15704 
















TST7 






1578 


16554 
















■ I r V J 


10440^ 




•143 


4500 


513S4 














TYPE ■ 


104401 




1138 


4126 


4132 


4138 


4369 


4375 


4362 


4368 


4394 








4661 


4662 


4665 




4689 


4708 


4757 


4 "'60 


4764 








5129* 


















TYPOC ■ 


10440P 




4131 


4137 


4374 


4381 


4367 


4393 


4399 


4664 


51304 


TYPON ■ 


104404 




51S2« 


















TYPOS - 


104403 




5131« 


















VECTOR 


012360 




4442* 


4453» 
















WAIT 






2436 


2537 


2565 


2588 


2648 


2670 


3047 


3057 


3129 








4221 


43064 


















011033 




3952# 


4022* 


















000002 




4151# 


4168 
















xniTiE- 


000100 




8804 


1430 


1443 


1446 


1460 


1463 


1477 


1482 


3365 








3944 


3979 
















xniTRO* 


000200 




879# 


1934 


2721 


2749 


2764 


3679 


3783 






Z2Z 


011074 




3963 


39674 
















zzzz 


011170 




4043 


40464 
















I^THD 


001000 




957 


9634 
















lASTAT- 






4813 


4828 
















iatyc 


013752 




4784 


47864 
















lATYl 


013726 




4782» 


















IATY3 


013754 




4589 


47634 
















•ATY4 


013744 




4785# 


4870 
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4498 

4857 



4501 
4865 



4550 

5012 



4604 

5061 



NAIWEC ZZ CVOVA 0 NACril 50A(10S2) 12 JUL-M 09:52 PAGE 133 

CVOVAO.Pll 12 JUL-S4 0S:0« CROSS REFERENCE TABLE -- USER SYMBOLS 



SEQ 150 



lAuTQB 

IBASE 

IBOAOR 

IBOOAT 

IBELL 

tBOCF' 

«CHARC 

iCKStA 

ICnTAG 

tCHS ' 

ICNTLG 

♦CWTLU 

♦CPUOP 

»CRLF 

I08LK 

•OEVCT 

•OEvn 

lOOAGN 
lOTBL 
lENOAO 
tElOCT 

tEMirc 

tENULL 

»ENV 

lENVn 

lEOP 

♦EOPCT 

lERFLG 

*ERnAX 

lERRFL- 



001154 
001250 
001 1Z2 
001126 
001164 
177777 
013146 
013152 
001100 
000000 
013677 
013672 
001222 
001171 
015070 
001204 
001252 
012462 
015060 
012452 
017420 
012471 
012466 
001214 
001215 
012364 
012412 
001103 
001115 
000000 



994* 
1056* 

9e9# 

991# 
10094 
1# 
4606* 
46504 

977f 
10074 
4661 
467a 
10324 
10114 
4976 
1023* 
10594 
4494 
4981 

943 
1105 
4496 
4501 
10264 
10294 
4426 
1105* 

9604 

9664 
11544 
11744 
12024 
12364 
12994 
1362 
14434 
1517 
15644 
1635 
17104 
1764 
16594 
2009 
21124 
2196 
22874 
2360 
2441 
25524 
2564 
26624 
2736 
26464 
29164 
2956 
30624 



1146* 
4440 



4857 

4616« 

5137 
1090 

47744 
47734 

4605 
5012 
4436« 
4457 
4503 
50164 
1136 
44964 
45134 
45124 



4656 

4890 
4625 
1091 



4640 

50204 

4463« 

45094 

45054 



4779 

4632* 
1099 

4689 
4685 



46374 

1105 1106 1107 
4773 4665 4690 





2697 


2906 


3183 


3847 


4584 


4791 


481 S 


4867 








1196 


4566 


4591 


4793 


















44864 
























44934 


4497 






















4652* 


4690 


4695 


4924 


4926 


4932* 


4954 












1106* 


4926 


4949* 


4954 


















1155 


11574 


11614 


1162 


11644 


1165 


11664 


1167 


11694 


1170 


11714 


1173 


1176 


11774 


1179 


11604 


1182 


11634 


1164 


11964 


1197 


11994 


12004 


12014 


12034 


1204 


12054 


1206 


12094 


1210 


12124 


1213 


12264 


1227 


12284 


1230 


12374 


12394 


12404 


1241 


12634 


1264 


12694 


1270 


12634 


1284 


12854 


1286 


1300 


13024 


1303 


1S164 


1317 


13194 


1320 


13454 


1346 


13594 


1360 


13614 


13754 


1376 


13784 


1379 


13924 


1393 


13954 


1396 


14274 


1428 


14414 


1442 


1444 


14574 


1458 


14604 


1461 


14744 


1475 


14774 


1476 


15104 


1511 


15164 


15164 


1519 


15324 


1533 


15354 


1536 


15464 


1549 


15504 


1551 


15774 


1576 


1585 


15984 


1599 


16004 


1601 


16144 


1615 


16174 


1616 


16314 


1632 


16344 


16604 


1661 


16744 


1675 


16764 


1677 


16904 


1691 


16934 


1694 


17064 


1707 


1711 


17364 


1737 


17504 


1751 


17524 


1753 


17664 


1767 


17694 


1770 


17634 


17864 


1787 


16124 


1613 


18264 


1827 


18284 


1829 


16424 


1643 


16454 


1646 


1860 


18624 


1663 


18994 


1900 


19314 


1932 


19644 


1965 


20004 


2001 


20064 


20564 


2057 


20684 


2069 


20724 


2073 


20664 


2069 


20924 


2093 


21064 


2109 


2113 


21454 


2146 


21574 


2158 


21614 


2162 


21774 


2176 


21614 


2162 


21974 


22014 


2202 


22354 


2236 


22474 


2246 


22514 


2252 


22674 


2266 


22714 


2272 


2286 


22914 


2292 


23234 


2324 


23354 


2336 


23394 


2340 


23554 


2356 


23594 


23754 


2376 


23794 


2380 


24154 


2416 


24284 


2429 


24314 


24S2 


24344 


24404 


24554 


2456 


24594 


2460 


24814 


2482 


24854 


2466 


25154 


2516 


25284 


2529 


2533 


2S354 


25414 


2542 


25554 


2556 


25604 


2561 


25634 


25794 


2560 


25634 


2S664 


26164 


2619 


26334 


2634 


26354 


2636 


26394 


2640 


26434 


2644 


26464 


2663 


26654 


2666 


26684 


27004 


2701 


27054 


2706 


27134 


2714 


27184 


27374 


27444 


2745 


27614 


27894 


2790 


27924 


2793 


27964 


2797 


28024 


26224 


2823 


2649 


26504 


2651 


26564 


2657 


26614 


28634 


2664 


29094 


2910 


29144 


2915 


2917 


29164 


2919 


29244 


2925 


29314 


293? 


29364 


2937 


29534 


2954 


29554 


29624 


2963 


30064 


3009 


30354 


3036 


30424 


3043 


30454 


30524 


3053 


30554 


3063 


30744 


3075 


30624 


3083 


30944 


3095 


31014 


3102 


31194 


3120 


31244 
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CROSS REFERENCE 


T4fll F 






5125 


51274 


31424 


3143 


W 774 






S197 


31994 


3200 


3202 








%2194 


1220 


32214 


3222 








V74 




3288 


32694 


1990 








SS594 


33604 


3361 










5«1S 


S4154 


3416 


14914 






14794 


S4754 


54744 


S4754 


14 7& 








S497 


SS014 


35104 


mi 








S5644 


3565 


35704 








SU44 


36174 


3616 


56194 










36554 


36604 


3661 


16644 








37064 


3706 


37094 


1710 






37614 


37654 


3766 


37684 








SA06# 


3606 


38094 


3810 


16194 






SA854 


3686 


38894 


3890 


18914 






5906 


39114 


3912 


39154 


1916 

V WAV 






S9664 


3970 


39724 


3973 


19794 






4021 


40224 


4023 


40274 


4028 






40624 


4083 


40654 


4066 


4M74 






41964 


4197 


42064 


4207 


42194 






42744 


4278 


42604 


4281 


4981 






4B19 


43204 


4321 


4323 


4127 






44264 


44524 


4453 


44564 


44S7 

^^^^ ■ 






44494 


4450 


44514 


4452 


44SS# 


1 ERROR 


014174 


1099 


48504 








•CRRPC 


001116 


9674 


4386 


4859» 


4860* 


4861 


tCWRTB 


001?S4 


10764 










ierttl 


001112 


9644 


4142 


4144* 


4858* 


4890 

^W *W 




001162 


10064 


1107* 


4881 


4883 


4AQO 




001214 

Afc 


10274 














969 


10604 








IFATAL 


001 > 76 


10204 


4379* 


4580 


4619* 




IfFLG 


01417> 


4782* 


4765* 


4813 


4622* 


48304 




OOllM 

WW* * 


10054 


4609 


4640 






IFILLS 


001 ISS 


10044 


4640 










OOOSIO 




1219 


1262 


1274 


1290 






1465 


1484 


1509 


1523 


1919 






1696 


1717 


1741 


1757 


1774 






1996 


201 S 

•W*«# 


2052 


2077 


2097 






2296 


2S21 


2S44 


2S64 


2184 






299S 


2616 


26S5 


2675 


2699 








2996 


SOI 3 


3068 


5086 






5256 


SS88 


3392 


3450 


3524 






S9S5 

^^^^ 


3977 


4014 


4018 


4015 




000401 




1219 


1262 


1274 








146S 


1484 


1509 


1523 


1539 






1696 


1717 


1741 


1757 


1774 






1996 


2013 


2052 


2077 


2097 






2296 


2521 


2344 


2364 


2584 






259 J 


2616 


2653 


2675 








2976 


2996 


3013 


3068 


3066 






5260 


5T<18 


3392 


3430 


3524 






S9SS 


5977 


4014 


4018 


10S5 


if ibla> 


000170 


14 










tFICAS- 


000150 


14 










»0€C' 


000220 


14 











IFSER SYMBOLS 



5178 


31664 


3167 


31924 


3193 


31944 


119% 




32074 


3206 


32104 


3211 


32134 


3214 


121M 


191 7 


3232 


32374 


3236 


32394 


3240 


32764 


1277 


197A« 


34464 


3347 


33504 


3351 


33534 


3354 


33564 


1197« 


3J63 


33654 


3366 


33754 


3376 


33794 


14094 


1410 


54«C4 


5441 


34444 


34454 


34474 


34484 


1449 


1471* 


34 784 


3479 


S4804 


3481 


54854 


3464 


14864 


1487 


35154 


35164 


3519 


35444 


5545 


35474 


3546 




35754 


3574 


35814 


3582 


35844 


3585 


35864 


3567 


36234 


3624 


96274 


36284 


36304 


36314 


3632 


36454 


5665 


3667 


3671 


36764 




3687 


36894 


36964 


37194 


3720 


37294 


3730 


37464 


3747 


37524 


5755 


3771 


3775 


37804 


37904 


3791 


37924 


38024 


380^ 


3820 


38504 


3851 


38564 


38804 


3881 


38834 


3884 


3892 


38954 


3896 


38964 


3899 


39014 


3902 


39054 


39184 


3919 


39424 


3943 


39444 


3945 


39654 


5966 


3980 
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4001 


40034 


4005 


40074 


4009 


40204 


40374 


4038 


40674 


4068 


40734 


4074 


40774 


4078 


41754 


4176 


41774 


4176 


41794 


4180 


41914 


4192 


42244 


4225 


42374 


4238 


42414 


4243 


42724 


4275 


4287 


42884 


4289 


42904 


4291 


42954 


4296 


45164 


45284 


4329 


4331 


4335 


45614 


4362 


44234 


4424 


44584 


4459 


44404 


4441 


44424 


4443 


44474 


4448 


4454 


44614 


4462 


44634 


4464 








4890 
















4946* 
















1307 


1326 


1350 


1366 


1363 


1402 


1432 


1448 


1555 


1576 


1589 


1605 


1622 


1641 


1665 


1681 


1795 


1817 


1833 


1850 


1869 


1903 


1936 


1966 


2117 


2145 


2166 


2186 


2206 


2232 


2256 


2276 


2412 


2445 


246S 


2472 


2489 


2512 


2546 


2570 


2751 


2831 




2906 


29S0 


2948 


2969 


2973 


5107 


3135 


3150 


3176 


3185 


3226 


3229 


•250 


3528 


3562 


3596 


3602 


3715 


3744 


3815 


3849 


4066 


4105 


4190 


4204 


4236 


4419 


4422 




1307 


1326 


1350 


1366 


1383 


1402 


1432 


1448 


1555 


1576 


1589 


1605 


1622 


1641 


1665 


IMl 
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1833 


1850 


1869 


1903 


1936 


l'««8 


2117 


2143 


2166 


2166 


2206 


2232 


2256 


2276 


2412 


2445 


2463 


2472 


2489 


2512 


2546 


2570 


2751 


2831 


2868 


2906 


2930 


2948 


2969 


2973 


3107 


3155 


3150 


3176 


3185 


5226 


5229 


3250 


3528 


3562 


3596 


3602 


3715 


3744 


3815 


3849 


4066 


4105 


4190 


4204 


4236 


4419 


4422 









MAT" r 1 1 
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USER 


SYMBOLS 








Ic i ' 




\£l£ 


1 5AA 


1 xos 


1 X9A 
i 9c* 






1 AJL3 


« ^/%7 

IXJ ' 


X9CX 


1 CX7 


1 ^^x 

X99J 


1 ^7A 
19 »A 








X ' X3 


X '3^ 


X 


1 775 
1 ' ' A 


1 741 

X '»X 


1 At K 

XOX9 








CVXX 






£%n9 


91 1 ^ 
CXX9 


91 A1 
AX*X 








c9X 7 






c9K 


9A1 A 


9AAX 








cOX* 


A9X 


9A7X 


9A07 


97911 
C ' AO 


97A4 










30AA 






947A 


94^A 






XI 7A 


dXOO 


X99X 


X99A 


X937 


X9A1I 


X9AA 
9a90 






WML 




V7t X 


X7AS 


XA1 X 

3013 


XJIA7 
*o* ' 


X4XX 

9799 








AIAJI 
*xoo 


A3A9 


A9XA 


AAt 7 
AAl 1 


AA9n 
**AV 








i» 


131 7 
XcX ' 


1 

XccS 


1 9AA 


1 9AA 


1979 
XC rc 


19711 
Xc 'O 




1 XAM 


X 


I'M* 


1 X7/> 
13 r(l 


1 XA1 
13V1 


1 *JI7 
XwO ' 


1 AAA 






1 AAO 


1 AH? 


1 Mmm 
X^OO 


19V r 


1 A1 V 

19X3 


1^1 

X9icX 


1^97 

X9ic ' 






190 ' 


X7vJ 


XOV9 


« AAA 

low 


1 A^A 

lOcO 


1 A9ik 
XDCO 


1 AXO 

X097 






1 703 


1 71^ 

X ' X J 


1 731 
X rex 


1 7xa 

1 lyt 


1 7A^ 
1 '49 


1 7^^ 

X '99 


1 7At 
X 'OX 






1 AVl 


111X7 
XO J > 


1 AAA 


IBS* 


1 AA7 

lOO r 


1 A7X 

XO ' 9 


1 Ml 

X^WX 








cvxx 




cV90 




9A7^ 

CV '9 


9AAX 

AV09 








PI 75 

CX 'C 


91AA 


91 09 


99AA 


9919 


99XA 
AA9U 








9X14 
«*x » 


9X9il 


9XA9 
C3A^ 


c390 


9Xlk9 

C90C 


9X7A 
C9 'V 










3A7n 


>A7A 


9AA7 


3A4X 
C^T9 


9mA 










cKx 


A9l 


9AV7 
M9r 


9iL7X 
AO ' 9 


9iL70 
AO '7 






« 'OT 




9At 9 


9A1 7 


tA90 


9An 

C099 


M7A 
CO 'V 








94X11 


C^40 


anxA 




947A 
my '* 


94A^ 

A^ro9 






S077 




XA07 


xinK 

31U9 


XI K 

3119 


XI XX 


XIA^ 
91*9 








X3XX 

ACS' 


UAI 


X9AA 
3C*fl 


X3K5 

3232 


X9^ 












XA9A 


XAXA 


39cA 


X^9A 

99cO 


xvxx 

9999 






UA7 


xm X 


XAI^ 
30X9 


X71 X 

3 r 13 


X799 
Hie 


X7A9 
9 '*c 


X7AO 
9 ''7 






M7S 


X4fll 


401c 


AAl A 


AOa4 


AA94 


AAXX 

W99 








^XOO 


A1 OX 


A10A 


4202 


A9AA 


A9XA 
Ac 9* 
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X3A1 


XAAA 
3VOA 


X79A 
9f24 


X7Ail 
9 rOO 


XA9< 
90a9 
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1 M 




A91 f 


A99A 












1 A 




















131 7 
XcX • 


XCOO 


1 979 
Ic 'C 


1 9AA 


1 XA^ 

X9V9 


1 X9A 
X9C^ 








1AA9 
x*wc 


tCA7 

l90r 


1X1 


1 VX7 


144X 

A 999 


1^7A 
19 '* 








171S 

X • X7 


1 7XO 

X 


1 »99 


1 779 


1 741 

X '▼X 


1 A1^ 

10X9 






*»^» 


cvxx 


9AftA 


9A74 


9nOK 

c^rF9 


91 1^ 
CXX9 


91 A1 
Al*l 






mm^^ 


9X14 
«sx » 


C9A2 


9XA9 


9XA9 

c9Bc 


9A10 
c^xv 


9AAX 








CvX^ 


2^9 X 


>A7X 
A r3 


9A07 


9 7 AO 


9A90 
cOCv 






907A 


904A 


XA1 1 
SOXX 


XAAA 


XAAA 


XI A^ 

9XV9 


XI XX 

9199 










XXAA 
390O 


xxw^ 

3»tW 


XA9A 
3AcO 


XV9 


X^9it 

99cO 






JO^ # 


X4XX 




AA1 9 


AO Id 


AOXX 
^V99 


AA<LA 
*^0* 








191Q 
XcX7 


1 


1 97A 
Ic 'A 


IcW 


1 XA7 
X9V' 


1 X9A 
X9cO 








1 AIM 


x3(rr 


1 %9X 
19c3 


1937 


X999 


1^7A 
X9 rO 








1717 

X ' X ' 


1 7A1 
X '•X 


1 7^7 

1 »9 f 


1 77A 
1 ' 'A 


1 70X 

1 ' 9 


1A1 7 

XOX ' 






IMA 


901X 
cvx J 


9fM9 
cv3c 


9A77 


9A07 


9117 
cX X ' 


91 AX 
CX*9 








9X91 
c^s X 


9XAA 


9XAA 


9XAA 
c904 


9A19 


c^'9 








cvXD 




A '9 


9AOO 


97^1 
A '9X 


9AX1 
A09X 






9«7il 




X/11 X 


XAAA 
3UDO 


XAAA 

3000 


XI A7 

9XV ' 


XI X^ 

3199 








X3fta 


XXAA 

99M 




XAXA 
94 90 


X^9A 


XUA 

99CO 






UIAO 


X4X^ 


X077 


AAf A 
#WIA 


AA1 A 

40ie 


AAXV 
OV99 


AAAA 
*vOO 


If tOTM* 




1 A 


AlSl 
^X3X 




A9AA 


4900 


AXA7 


*9*9 


mr 9 JCl, ■ 


(WM Art 


















MV)1 V) 

WW X JV 


1 « 


XcV ' 


1 9X1 

xc3x 


909A 

«^«o 


90AA 
«>AU 


X49X 

9»a9 


X49^ 

97c9 


if* A^4T ■ 




i» 






94114 




X99A 
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X9AA 




00040^ 


1 • 


1217 


1260 


1272 


1208 


ISOS 


1S24 













w 


1S48 


1564 


1581 


1400 


1430 


1446 


1567 


1605 


1620 


1659 


1663 


16 79 


lasi 


1040 


1867 


1901 


1V34 


1966 


2164 


2184 


2204 


2250 


2254 


2274 


2461 


2470 


2487 


2510 


2544 


2566 


2769 


2612 


2629 


2670 


2886 


2906 


soil 


5066 


5064 


3105 


3133 


3148 


SS66 


5590 


5428 


5522 


5526 


3560 


5975 


4012 


4016 


4055 


4064 


4095 


1286 


1294 


1505 


1511 


1524 


1330 


1406 


1450 


1456 


1446 


1452 


1465 


1537 


1545 


1553 


1559 


1574 


1560 


1645 


1665 


1669 


1679 


1665 


1696 


1772 


1778 


1791 


1797 


1815 


1821 


1912 


1954 


1945 


1966 


1979 


1996 


2095 


2105 


2115 


2123 


2141 


2146 


22S6 


2254 


2262 


2274 


2202 


2294 


2562 


2590 


2410 


2418 


2445 


2449 


2518 


2544 


2550 


2568 


2574 


2591 


2697 


2705 


2728 


2755 


2749 


2755 


2875 


2866 


2692 


2906 


2912 


2926 


2967 


2994 


5001 


3011 


5017 


3066 


3146 


5155 


5174 


5180 


5185 


3189 


5262 


5271 


5275 


3386 


5590 


5396 


5559 


5541 


5560 


5567 


5596 


3600 


5615 


5022 


5047 


5655 


3933 


3939 


4040 


4064 


4070 


4095 


4100 


4103 


4259 


4417 


4420 


4425 


4434 


4444 


4280 


4292 


4520 


4528 


4336 


4539 


1546 


1564 


1501 


1400 


1450 


1446 


1507 


1605 


1620 


1659 


1665 


1679 


1651 


1040 


1067 


1901 


1954 


1966 


2164 


2104 


2204 


2230 


2254 


2274 


2461 


2470 


2407 


2510 


2544 


2568 


2886 


2906 


2920 


2946 


2967 


2971 


5148 


5174 


5185 


5224 


3227 


3248 


5560 


5596 


5600 


5713 


5742 


5813 


4186 


4417 


4420 








1550 


1566 


1563 


1402 


1432 


1446 


1589 


1605 


1622 


1641 


1665 


i.661 


1855 


1050 


1869 


1905 


1936 


1960 


2166 


2186 


2206 


2232 


2256 


2276 


2465 


2472 


2469 


2512 


2546 


2570 


2866 


2908 


2950 


2948 


2969 


2973 


5150 


5176 


5185 


5226 


5229 


5250 


5562 


5598 


5602 


5715 


5744 


5615 


4105 


4190 


4204 


4256 


4419 


4422 


4566 


4401 


4406 


4472 






4415 


4457 










5250 












1540 


1564 


1561 


1400 


1450 


1446 
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1463 


4 A A 1 

1492 


1507 


4 C^4 

1521 


4 C V 7 

1597 






1696 


1715 


1739 


4 7CC 

1755 


4 77^ 

1772 






1996 


2011 




9A7C 

2075 


2095 






2294 


2919 


2942 


9VA9 

2962 


9VA9 

2982 






2591 


2614 


2d51 


94L7 V 
CD ' 9 








29 f 4 


2W 


VAI 1 


3^^0 












3 JOO 














3irf J 






tGOAOR 


001 120 












tSOOAT 


001124 












IGET42 


012442 


4502# 










•GTSMR 


01S222 


4662* 


C 4 vc 

5195 








thO 


oooooc 


689 










tHiBTS 


f\ f\ ■ AAA 

001000 


964# 










• ICNT 


001104 


961# 


4999* 


A AAA 
4940 


A AA9 A 

4^2* 


AAKV 

4^9 


IIFLEV" 


177777 


1# 


4^4 7 A 

1217# 


4 99VA 

122 9# 


4 ^AAA 

1260V 


4 ^AAA 

1266V 


194«# 


4 V4tAA 

19549 


4 VA^A 

19644 


4 V7AA 

1970V 


4 VA4 A 

1981V 






14o9# 


4 AA^A 

1462# 


4 A AAA 

1466# 


1 KA7A 

15074 


1 VI va 
1319V 








4 KAVA 

1599# 


1609* 


1 AAOA 
IW^V 


1 &9AA 






1702* 


4 74 &A 

17154 


4 794 A 
1721V 


4 7VAA 

1799V 


4 7AKA 

1745V 






4 A V 4 A 


4 AV7A 

169 79 


4 AA AA 

16484 


4 AOAA 

16544 


4 AA7A 

16674 






2009# 


^\4 4 A 

2011# 


2026# 


-WMTHA 

2V30V 


2n5^ 






^4 A 

2164* 


^4 7^A 

2172* 


94 AAA 

21644 


94 A9A 

2192V 


99AAA 
22U4V 






2902V 


^V4 AA 

2919V 


2926* 


9VA9A 


9WAA 
2930V 






2461# 


^AX7A 

246 7# 


9A7AA 

24704 


9A7AA 
24 f 6V 


9AA7A 
2487V 






^KA7A 


A A 

2614V 




2631V 


283 fV 






^7A.lkA 

2769# 


^77AA 

2 ' '4v 


9A4 9A 

2612 V 


901 7A 
281 rV 


9A90A 

2827V 






2996# 


2946# 


9MKAA 
<T06V 


9071 A 


907AA 
2Tf 4V 






90649 


ViWk7A 


9105V 


V1 1 va 
9115V 


VI VVA 
9199V 






•m^M 4 A 

5241# 


SfSA AA 

9246# 


9256* 


V974 A 

32 'IV 


V97VA 
9279V 








35* IV 


95oOV 


V*CiL7A 
930 ' V 


93mv 








96* 'V 


9059V 


VOVVA 

9Tr93V 


VOVOA 






A^W^ A 

4064# 


A/\7AA 

4070* 


4OT5V 


4HWV 


At AVA 
41W9V 






AA ^\A 


AASAA 


M aaaa 
4455V 






IlLLUP 


0X2032 


AK^% 

4520 


AdA 

4596 


4555V 






I INT AC 


001135 


995# 


4690 


A770 








000001 


4 ^4 7A 


1229 


1260V 


1266 


1 979A 
12 '2V 








4 VXAA 

19644 


4 V7A 

1970 


1 VA1 A 
1961V 


1 VJI7 
190 f 






4 A A^A 

1482* 


4 AAA 

1466 


4 KA7A 

15074 


4 VI V 

1519 


1 KO% A 

13clV 






1599 


1609V 


1 A/to 


1&3AA 
16cW 


lOcO 






4 74 KA 

1715# 


4 7^4 

1721 


4 7VQA 
1 f 91»V 


1 7AV 
1 f *3 


1 TWA 
& r 33V 






4 A V7 

1097 


4 AA AA 

1646# 


4 AAA 

1654 


1 4&7A 
106rV 


AO '9 






^\4 4 A 
2011V 


2026 




9AVO 
«W3t» 


cVr3V 






^4 7^ 

2172 


94 AAA 

21644 


94 09 

2192 


99AAA 


991 9 
2212 






4 AA 

2919v 


9V^A. 

2926 


9VA9A 

2942V 


SWA 
2930 


9VA9A 

2962V 






2467 


9A7AA 

24 f OV 


9A74:. 

24 7o 


9tA07A 


9AOV 






^^4 A A 

2614# 


2621 


^AC4 A 

2651V 


9I&V7 
263 r 


9IA.7VA 
cV9V 






2774 


9A4 9A 

2612* 


904 7 

261 r 


2629V 


9AW 
2895 






ST40» 


2Y56 


9071 A 


9047 


30AAA 

CirTWV 






9115 


91994 


9143 


VI AAA 


VI W 

9133 






»«A^ ^ 

990O« 


9VV5 


VA94A 
99cOV 




93c2V 






3749 


3813* 


3622 


SB47« 


SBS3 




















4455 










IISKI . 


000001 


2974# 
4434 


2965 


3256* 


3271 


3390* 















SEQ 15 




136 
















USER SYMBOLS 














1553 


1574 


1587 


1603 


1620 


1639 


1663 


1679 


1791 


1815 


1831 


1848 


1867 


1901 


1934 


1966 


2115 


2141 


2164 


2184 


2204 


2230 


2254 


2274 


2410 


2443 


2461 


2470 


2487 


2510 


2544 


2566 


2749 


2829 


2886 


2906 


2928 


2946 


2967 


2971 


3105 


3133 


3148 


3174 


3183 


3224 


3227 


3248 


3522 


3526 


3560 


3596 


3600 


3713 


3742 


3813 


4033 


4064 


4103 


4168 


4202 


4234 


4417 


442C 


1272* 


127B8 


12888 


12948 


13058 


1311* 


1324* 


1330* 


15B7* 


14008 


14068 


14308 


14368 


1446* 


1452* 


1463* 


1S2X* 


15278 


15378 


15438 


15538 


15598 


1574* 


1580* 


1626« 


16398 


16458 


16638 


16698 


16798 


1685* 


1696* 


17SS8 


17618 


17728 


17788 


17918 


17978 


18158 


1821* 


187S8 


19018 


19128 


19348 


19458 


19668 


19798 


1996* 


20758 


20838 


20958 


21038 


21158 


21238 


21418 


2148* 


22128 


22308 


22388 


22548 


22628 


22748 


2282* 


2294* 


23628 


23708 


23828 


23908 


24108 


2418* 


2443* 


2449* 


24938 


25108 


25188 


25448 


25508 


2568* 


2574* 


2591* 


26738 


26798 


26978 


27038 


27288 


2733* 


2749* 


2755* 


2BS58 


28708 


28758 


28868 


28928 


29068 


2912* 


2928* 


29B58 


29878 


29948 


30018 


30118 


30178 


3066* 


3077* 


31458 


31488 


31558 


31748 


31808 


31838 


3189* 


3227* 


33868 


33908 


34038 


34058 


34288 


3434* 


3522* 


3526* 


36008 


36138 


36158 


37138 


37228 


3742* 


3749* 


3813* 


39758 


V AA 4 M. 

39818 


40128 


40168 


40248 


4C29* 


4033* 


4040* 


41098 


41888 


41988 


42028 


42088 


4234* 


4239* 


4417* 


1276 


12888 


1294 


13058 


1311 


1324* 


1330 


1348* 


14008 


1406 


14308 


1436 


14468 


1452 


1463* 


1469 


1527 


15378 


1543 


15538 


1559 


1574* 


1580 


1587* 


16398 


1645 


16638 


1669 


1679* 


1685 


1696* 


1702 


1761 


17728 


1778 


17918 


1797 


1815* 


1821 


1831* 


19018 


1912 


19348 


1945 


19668 


1979 


1996* 


2003 


20B3 


20958 


2103 


21158 


2123 


2141* 


2148 


2164* 


22308 


2238 


22548 


2262 


22748 


2282 


2294* 


2302 


2370 


23828 


2390 


24108 


2418 


2443* 


2449 


2461* 


25108 


2516 


^i448 


2550 


2568* 


2574 


2591* 


2597 


2679 


26978 


2703 


27288 


2733 


2749* 


2755 


2769* 


2B708 


2875 


28668 


2892 


29068 


2912 


2928* 


2938 


3001 


30118 


3017 


30668 


3077 


3064* 


3097 


3105* 


31748 


3160 


31838 


3189 


32278 


3241 


3248* 


3273 


3541 


35608 


3567 


35968 


3615 


3713* 


3722 


3/42* 


39338 


3939 


39758 


3981 


40128 


4029 


4033* 


4040 


4109 


41888 


4198 


42028 


4208 


4234* 


4239 


4417* 


3403 


35268 


3539 


3600« 


3613 


4016* 


4024 


4420* 
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SEQ 154 



tUim 001114 

»LF 001172 

tLFLG 014171 

»L0CTA. 177777 



tLPAOR 001106 
tLPERP 001110 



9e5« 


4579 


4661* 


4669 


4690 


















1012* 


4640 


4764 


4^75 


4690 


















4625* 


4629# 


























1207 


1206 


1216 


1219 


1225 


1224 


1232 


1233 


1261 


1262 


1266 


1267 


1275 


1274 


1276 


1279 


1269 
1350 


1290 


1294 


1295 


1506 


1507 


1511 


1512 


1525 


1526 


1550 


1551 


1549 


1554 


1555 


1565 


1566 


1570 


1571 


1562 


1565 


1567 


1566 


1401 


1402 


1406 


1407 


1451 


1452 


1456 


1457 


1447 


1446 


1452 


1455 


1464 


1465 


1469 


1470 


1485 


1484 


1466 


1469 


1506 


1509 


1515 


1514 


15«;2 


1525 


1527 


1526 


1536 


1559 


1545 


1544 


1554 


1555 


1559 


1560 


1575 


1576 


1560 


1561 


1566 


1569 


1595 


1594 


1604 


1605 


1609 


1610 


1621 


1622 


1626 


1627 


1640 


1641 


1645 


1646 


1664 


1665 


1669 


1670 


1660 


1661 


1665 


1666 


1697 


1696 


1702 


1705 


1716 


1717 


1721 


1722 


1740 


1741 


1745 


1746 


1756 


1757 


1761 


1762 


1775 


1774 


1776 


1779 


1792 


1795 


1797 


1796 


1616 


1617 


1621 


1622 


1652 


1655 


1657 


1656 


1849 


1650 


1654 


1655 


1666 


1669 


1675 


1674 


1902 


1905 


1912 


1915 


1955 


1956 


1945 


1946 


1967 


1966 


1979 


1960 


1997 


1996 


2003 


2004 


2012 


2013 


2026 


2027 


2051 


2052 


2059 


2060 


2076 


2077 


2063 


2084 


2096 


2097 


2103 


2104 


2116 


2117 


2125 


2124 


2142 


2145 


2146 


2149 


2165 


2166 


2172 


2173 


2185 


2186 


2192 


2195 


2205 


2206 


2212 


2215 


2251 


2232 


2256 


2239 


2255 


2256 


2262 


2263 


2275 


2276 


2262 


2265 


2295 


2296 


2302 


2505 


2320 


2321 


2326 


2527 


2345 


2344 


2550 


2551 


2565 


2564 


2570 


2571 


2565 


2384 


2390 


2591 


2411 


2412 


2416 


2419 


2444 


2445 


2449 


2450 


2462 


2465 


2467 


2468 


2471 


2472 


2476 


2477 


2466 


24#9 


2495 


2494 


2511 


2512 


2516 


2519 


2545 


2546 


2550 


2551 


2569 


2570 


2574 


2575 


2592 


2595 


2597 


2596 


2615 


2616 


2621 


2622 


2652 


2655 


2657 


2656 


2674 


2675 


2679 


2660 


2696 


2699 


2705 


2704 


2728 


2729 


2755 


2754 


2750 


2751 


2755 


2756 


2769 


2770 


2774 


2775 


2612 


2815 


2617 


2616 


2650 


2851 


2655 


2656 


2670 


2671 


2675 


2676 


2887 


2868 


2692 


2695 


2907 


2906 


2912 


2915 


2926 


2927 


2929 


2950 


2955 


2934 


2935 


2938 


2939 


2941 


2942 


2945 


2944 


2945 


2947 


2946 


2956 


2959 


2966 


2967 


2966 


2969 


2972 


2975 


2975 


2976 


2965 


2966 


2987 


2986 


2989 


2990 


2991 


2995 


2996 


5001 


5002 


5012 


SOIS 


SOI 7 


3016 


3067 


3068 


3077 


3078 


3085 


3066 


3097 


3096 


3106 


3107 


S115 


3116 


3134 


3135 


3145 


3146 


3149 


3150 


3155 


3156 


3175 


3176 


5160 


5161 


5184 


3185 


3189 


3190 


3200 


3201 


3202 


5203 


3204 


3205 


3206 


3223 


5224 


3225 


3226 


3228 


3229 


3233 


3234 


3235 


5241 


3242 


3244 


3245 


3246 


5249 


3250 


3252 


3255 


3254 


3257 


3256 


3259 


3260 


3262 


3265 


5264 


3271 


5272 


3275 


5274 


5281 


3282 


3283 


3367 


3388 


3391 


3592 


5396 


5597 


3390 


5405 


5404 


5405 


3406 


5429 


3430 


5454 


5455 


5525 


5524 


5527 


5526 


3555 


5554 


5555 


5559 


5540 


5541 


5542 


5561 


5562 


5567 


5566 


5597 


5596 


A 4 

9601 


5602 


3607 


5606 


5609 


3615 


5614 


5615 


5616 


5665 


5666 


5667 




9669 


5670 


5671 


5714 


5715 


3722 


5725 


5724 


5725 


5726 


5745 


5744 


5749 


V YCA 

3750 


5769 


5770 


5771 


5772 


5775 


5774 


5775 


5614 


3815 


5822 


3625 


3625 


9626 


5627 


3646 


5649 


5655 


5654 


5925 


5924 


5926 


3927 


5926 


5929 


3930 


39.5* 


5955 


5959 


5940 


5976 


5977 


5981 


5982 


4015 


4014 


4017 


4016 


402* 


40«5 


4029 


4050 


4054 


4055 


4040 


4041 


4065 


4066 


4070 


4071 


4095 


4096 


4100 


4101 


4104 


4105 


4109 


4110 


4150 


4185 


4166 


4169 


4190 


4195 


4194 


4195 


4196 


4199 


4205 


4204 


4208 


4209 


4212 


4215 


4214 


4215 


4226 




42c0 


4235 


4236 


4237 


4238 


4239 


4240 


4242 


4243 


4250 


4251 


4252 


4253 


425 ' 


4261 


4262 


4283 


4284 


4285 


4286 


4287 


4292 


4293 


4294 


4297 


4296 


4900 


4501 


4302 


4306 


4321 


4322 


4323 


4324 


4325 


4326 


4327 


4329 


4990 


4991 


4552 


4555 


4534 


4555 


4536 


4557 


4338 


4359 


4340 


4341 


4345 


494e 


' 


4567 


4401 


4402 


4405 


4405 


4415 


4416 


4418 


4419 


4421 


4422 


4425 


4426 


4427 


4434 


4435 


4444 


4445 


4446 


4455 


4456 


4456 


4459 


4465 


4466 


44 '2 


4475 


4474 
























962* 


1109* 


4950* 


4946* 


4951 


4955 














1441* 


965* 


1110* 


1209* 


1269* 


1263* 


1299* 


1516* 


1345* 


1359* 


1575* 


1592* 


1427* 


1457* 


1474* 


1516* 


1532* 


1548* 


1S84* 


1596* 


1614* 


1631* 


1660* 


1674* 


1690* 


1706* 



rMIIOEC ZZ CvOVA-0 
CVDVAO.Pll 12 -JUL -84 



ILSTCN- 177777 



♦L5TIN- 000000 



rtACYii 


304( 1052 ) 


12-JU 


L-84 09:52 PAGE 


138 












SEQ 


135 


05:04 




CROSS REFERENCE 


iMBLC - - 


USER SYMBOLS 














1736* 


1750* 


1766* 


1763* 




1626* 


1642* 


1659* 


1699* 


1931* 


1964* 


2006* 


2068* 


2088* 


2106* 


2157» 


2177» 


Cl^f • 


2247* 


2267* 


2267* 


2335* 


2355* 


2375* 


2426* 


2455* 


2481* 


2S26* 


2555* 


2579* 




2662* 


2705* 


2737* 


2792* 


2622* 


2650* 


3035* 


3062* 


SlOl* 


3119* 


SS62* 


3409* 




3556* 


4680 


4930 


4947* 


4953 




1# 


1207 


1208 


1217 




1223 


1231 


1260 


1262 


1266 


1272 


1274 


1278 


1268 


1290 


1294 


1305 




1311 


1324 


1326 


1330 


1348 


1350 


1354 


1364 


1366 


1370 


1381 


1383 


1 'UI7 


1400 


1402 


1406 


1430 


1432 


1436 


1446 


1448 


1452 


1463 


1465 


1469 




1484 


1466 


1507 


1509 


1513 


1521 


1523 


1527 


1557 


1539 


1543 


1553 




1559 


1574 


1576 


1580 


1567 


1569 


1593 


1603 


1605 


1609 


1620 


1622 


IDCD 


1639 


1641 


1645 


1663 


1665 


1669 


1679 


1681 


1685 


1696 


1696 


1702 


171^ 

1 r 13 


1717 


1721 


1759 


• ^M m 

1741 


1745 


1755 


1757 


1761 


1772 


1774 


1778 


1791 


1 70T 


1797 


1815 


1817 


1821 


1831 


1833 


1837 


1848 


1850 


1854 


1867 


1869 


1 A7T 


1901 


1903 


1912 


1934 


1936 


1945 


1966 


1966 


1979 


1996 


1996 


2003 


cUll 


2013 


2026 


2050 


nM ^ 

2052 


2059 


2075 


2077 


2083 


2095 


2097 


2103 


2115 


31 1 7 


2123 


2141 


2143 


2148 


2164 


2166 


2172 


2184 


2186 


2192 


2204 


2206 




2230 


2232 


2236 


2254 


2256 


2262 


2274 


2276 


2282 


2294 


2296 


2302 




2321 


2326 


2342 


2344 


2350 


2362 


2364 


2370 


2382 


2384 


2390 


2410 




2418 


2443 


2445 


2449 


2461 


2463 


2467 


2470 


2472 


2476 


2467 


2489 




2510 


2512 


2518 


2544 


'^M MM 

2546 


2550 


2566 


2570 


2574 


2591 


2593 


2597 




2616 


2621 


2651 


2653 


2657 


2673 


2675 


2679 


2697 


2699 


2703 


2726 




2733 


2749 


2751 


2755 


2769 


2770 


2774 


2612 


2613 


2617 


2629 


2631 


SAW 


2670 


2671 


2675 


2866 


«^AA A 

2666 


2692 


2906 


2908 


2912 


2926 


2927 


2928 




2934 


2935 


2936 


2940 


2945 


2946 


2946 


2958 


2966 


2967 


2969 


2971 




2974 


2976 


2965 


2967 


2969 


2990 


2994 


2996 


3001 


3011 
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014170 
015715 
001210 
001212 
001174 
01S704 
001225 
001251 
001255 
001241 
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4166 
4254 
4507 
4559 
4426 

1* 
1550 
1455 
1500 
1666 
1821 
1960 
2148 
2265 
2449 
2575 
2755 
2915 
2965 
5096 
5205 
5264 
5454 
3614 
5770 
5950 
4100 
4209 
4264 
4530 
4401 
4455 
1045« 
1049* 
1052« 
1055# 
965 
1809 
2785 
4945 
1059* 
1047* 
1050* 
1055# 
965« 
1* 
4765* 
4665 
1025# 
1026* 
1019# 
4662 
1040* 
1048# 
10S1« 
1054* 



SEQ 136 





4190 


4193 


4194 


4195 


4198 


4202 


4?04 




491 1 
'til 








4239 


4250 


4258 


4280 


4282 


4283 


4284 






4901 


430U 




4322 


4525 


4324 


452*^ 


4328 


4330 

^ WWW 


^wwA 


4117 


'w 




433 r 


4540 


4S4S 


4568 


4401 


4406 


4415 


4416 

^^*W 


4417 


4414 


4490 


4499 




4427 


4434 


4444 


4445 


4446 


4455 


4457 


4472 








1207 


1208 


1225 


1224 


1266 


1267 


1278 


1279 

AK ' 7 


1294 


1999 




1 11 3 


1551 


1554 


1555 


1570 


1571 


1587 


1366 


1406 


1407 

A^W f 


143ft 


1417 


1493 


1469 


1470 


1468 


1489 


1515 


1514 

*W*^ 


1527 

AWK ■ 


1528 

AWKW 


1543 

A^^ w 


1S44 




1 *^J\ 
X jow 


1581 


1595 


1594 


1609 


161^^ 


1626 


1627 


1645 


1646 








1702 


1705 


1721 


1722 


1745 


1746 


1761 


1762 


1778 

A ' ' V 


1779 


1 7Q7 


1 70A 




1837 


1858 


1854 


1655 


1875 


1874 


1912 


1913 


194S 




1 Q70 

XT 1^ 


2003 


2004 


2026 


2027 


2059 


2060 


2085 


2084 


2103 

K A VW 


9104 


9191 
cXc J 


91 94 


2149 


2172 


2175 


2192 


2195 


2212 


2215 


2258 


2239 


99ft9 


99ft 1 


99119 


2502 


2505 


2526 


2527 


2550 


2551 


2570 


2571 


2590 


2391 


9418 

xo 


94 1Q 
c'X y 


2450 


2467 


2468 


2476 


2477 


2495 


2494 


2516 


2519 


2550 

swww 


9551 

C JJX 


9974 


2597 


2598 


2621 


2622 


2657 


2658 


2679 


2660 


2705 


2704 


2733 

K ' WW 


9734 


2756 


2774 


2775 


2817 


2616 


2655 


2656 


2875 


2876 


2899 


9A91 


P91P 

C'AC 


2926 


2927 


2934 


2955 


2956 


2959 


2944 


2945 


2958 


2959 

& 7W7 


99ftft 


c; ' 


2986 


2987 


2968 


2990 


2991 


5001 


5002 


5017 


5018 


3077 


307S 


3M7 


5115 


5116 


5145 


5146 


5155 


5156 


5180 


5181 

WAW A 


5189 

W AW ' 


5190 

WA W 


3901 


3POP 


5204 


5225 


5224 


5254 


5255 


5241 


5242 


3245 


3246 




32S4 


WCWW 


5271 


5272 


5275 


5274 


5262 


3265 


3397 


3396 


3403 


S404 


3405 

w vww 


14M 


3435 


5534 


3535 


3539 


3540 


5541 


3542 

••W 'fc 


3567 


3566 


5608 


5609 

«^wW 7 


KIS 

^^A w 


3615 


3616 


3666 


3667 




3669 


3722 


3725 


3725 


5726 


3749 


3750 


5771 


5772 


3775 


3822 


3823 


5826 


5827 


5655 


5854 


5925 


5924 


5929 

W 7K » 


5959 


5940 


5961 


3962 


4024 


4025 


4029 


4050 


4040 


4041 


4070 


4071 


4101 


4109 


4110 


4150 


4151 

~* w* 


4185 


4186 


4194 


4195 

^ A 7W 


4198 

^ A *W 


4199 

^x y y 


4208 


4227 


4228 


4259 


4240 


4250 


4251 


4252 


4253 


4257 


4258 


4282 


4285 


4265 


4295 


4294 


4300 


4501 


4502 


4506 


4307 


4522 


4525 


4524 


4525 


4551 


4552 


4355 


4557 


4558 


4540 


4541 


4545 


4546 


4547 


4367 


4366 


4402 


4405 


4405 


4406 


4415 


4416 


4426 


4427 


4434 


4455 


4445 


4446 


4456 


4472 


4473 


4474 



















969 
1892 
2644 



1016* 

1925 
2902 



1127 
1958 
3032 



1142 
1992 
3172 



1194 
2047 
5343 



1257 
2138 
3467 



1341 1418 1505 1572 1657 1735 
2227 2316 2407 2507 2611 2695 
3642 3740 3842 4062 4584 48ft7 



4769 

4777# 

4799* 

4604* 

4797 

4775# 



4824* 

4802 
4605* 



4626* 



4617 4621* 
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v-/ J. a. 
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SEQ 139 


CVOVAO.Pll 12-JU.-84 


05:04 




CROSS REFERENCE 


TABLE 


USER SYMeOLS 














inxCNT 


0146S2 


4945 


4955* 
























IKf STL* 


177777 


!• 


1207# 


12174 


12234 


12514 


12604 


12664 


12724 


12764 


12684 


12944 


15054 


15114 






1524* 


1550* 


15484 


13544 


15644 


13704 


13614 


15874 


14004 


14064 


14504 


14564 


14464 






1452* 


1465* 


14694 


14824 


14884 


15074 


15134 


15214 


15274 


15574 


15454 


15554 


15594 






J574# 


1580* 


15874 


15954 


16054 


16094 


16204 


16264 


16594 


16454 


16654 


16694 


16794 






X665* 


1696« 


17024 


17154 


17214 


17394 


17454 


17554 


17614 


17724 


17784 


17914 


17974 






1815« 


18214 


18514 


18574 


18484 


18544 


18674 


18754 


19014 


19124 


19544 


19454 


19664 






1979# 


1996* 


20054 


20114 


20264 


20504 


20594 


20754 


20854 


20954 


21054 


21154 


21254 






2141* 


2148* 


21644 


21724 


21844 


21924 


22044 


22129 


22504 


22384 


22544 


22624 


22744 






2282# 


2294* 


25024 


25194 


23264 


23424 


23504 


23624 


25704 


23824 


25904 


24104 


24184 






2445« 


2449# 


24614 


24674 


24704 


24764 


24874 


24954 


25104 


25184 


25444 


25504 


25684 






2574# 


2591* 


25974 


26144 


26214 


26514 


26574 


26754 


26794 


26974 


27054 


27284 


27554 






2749* 


2755* 


27694 


27744 


28124 


28174 


28294 


28554 


28704 


28754 


28864 


28924 


29064 






2912# 


2926* 


29284 


?953 


29384 


29404 


29464 


29584 


29664 


29714 


29744 


29854 


29874 






2989# 


2994* 


50014 


50114 


50174 


30664 


30774 


50844 


50974 


31054 


51154 


51534 


51454 






5146* 


5155* 


51744 


51804 


31654 


31894 


51994 


52254 


32274 


5255 


32414 


32444 


32484 






5252 


S256* 


3262 


32714 


i2734 


32614 


33664 


33904 


3S96 


34034 


34054 


34284 


34544 






SS22* 


SS26# 


3533 


35394 


« M. 

35414 


35604 


35674 


35964 


36004 


3607 


36134 


56154 


56644 






5715* 


5722# 


37244 


37424 


3749# 


37664 


36134 


36224 


36254 


38474 


58534 


59254 


59254 






5935* 


3939* 


39754 


39614 


AAA 

40124 


40164 


40244 


40294 


40334 


40404 


40644 


40704 


40954 






4100* 


41054 


41094 


415l» 


41854 


41884 


4193 


41984 


42024 


42084 


4211 


42264 


4234* 






4259* 


42504 


42584 


42804 


42924 


43004 


43074 


43204 


45284 


45564 


45594 


43454 


4568* 






4401* 


44064 


44154 


44174 


44204 


4425 


44344 


4444 


44554 


44574 


44724 




tNSKO - 


OOOSOO 


1207# 


1251 


12604 


1266 


12724 


1278 


12884 


1294 


15054 


1511 


15244 


1530 


15484 






1554 


15644 


1570 


13614 


1387 


14004 


1406 


14504 


1456 


14464 


1452 


14654 


1469 






1462* 


1488 


15074 


1513 


15214 


1527 


15574 


1545 


15554 


1559 


15744 


1580 


15874 






1595 


16054 


1609 


16204 


1626 


16594 


1645 


16654 


1669 


16794 


1685 


16964 


1702 






1715# 


1721 


17594 


1745 


17554 


1761 


17724 


1778 


17914 


1797 


18154 


1821 


18514 






1657 


18484 


1854 


18674 


1873 


19014 


1912 


19544 


1945 


19664 


1979 


19964 


2005 






2011# 


2026 


20504 


2059 


20754 


2065 


20954 


2105 


21154 


2123 


21414 


2148 


21644 






2172 


21844 


2192 


22044 


2212 


22504 


2238 


22544 


2262 


22744 


2282 


22944 


2502 






2319# 


2326 


23424 


2350 


23624 


2370 


23624 


2390 


24104 


2416 


24434 


2449 


24614 






2467 


24704 


2476 


24674 


2493 


25104 


2516 


25444 


2550 


25664 


2574 


25914 


2597 






2614* 


2621 


26514 


2657 


26734 


2679 


26974 


2703 


27264 


2733 


27494 


2755 


27694 






2774 


2812* 


2817 


26294 


2635 


26704 


2675 


26664 


2692 


29064 


2912 


29264 


2940 






2946# 


2958 


29664 


2969 


29944 


3001 


30114 


3017 


30664 


3077 


50844 


5097 


51054 






5115 


51554 


3145 


51484 


3155 


31744 


3160 


51634 


5189 


31994 


5281 


3386^ 


5405 






S428« 


3434 


35224 


3541 


35604 


3567 


55964 


5615 


56644 


3724 


37424 


5749 


57684 






5825 


38474 


3853 


39234 


3925 


39554 


5959 


59754 


3961 


401^4 


4029 


40554 


4040 






4064* 


4070 


40954 


4100 


41034 


4109 


41514 


4250 


42564 


4300 


43074 


4545 


45684 






4401 


44064 


4472 






















tNSKl - 


000150 


1217* 


1225 


29284 


2933 


2938 


29714 


2987 


52254 


3244 


52484 


5252 


5275 


55904 






5596 


5405 


35264 


3533 


3539 


36004 


3607 


3613 


37134 


5722 


38134 


5822 


40164 






4024 


41854 


4211 


4226 


42344 


4239 


42804 


4292 


45204 


4559 


44154 


4457 




JNSK2 • 


000110 


2974# 


2985 


32274 


3233 


5241 


32564 


3262 


3271 


41864 


4193 


4198 


42024 


4206 






432M 


4556 


44174 


4444 


4455 


















(NSK3 - 


000110 


4420* 


4425 


4434 






















INULL 


001154 


1005* 


4611 


4640 






















tNUTSr- 


000001 


1186* 


1188 


12S04 


1252 


13364 


14134 


14954 


1497 


15664 


1568 


16524 


17284 


4 A Am m 

18044 






1887* 


19204 


19534 


19674 


20404 


2042 


21314 


2135 


22204 


2222 


23104 


2312 


25984 






2400 


25004 


2502 


26064 


26864 


2688 


27784 


2780 


28594 


28954 


2897 


50274 


5164* 






5166 


55534 


3355 


54594 


5461 


36564 


5658 


57554 


38564 


5838 


40554 


M Af ^ 

4057 


4121* 


(OCNT 


015522 


5055* 


5082* 


50954 






















tOMOOE 


015524 


5048* 


5052* 


5057 


5060* 




50974 
















«OVER 


014656 


4907 


4925 


4951 


4941 


49504 




















001202 


1022# 


1127* 


4490* 


4491* 


4499 


4512 


4957 


4954 
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IPASTK 


001006 


967« 


45584 
















4551 














012646 

WAS w ■ w 


45534 














IPyRON 


012506 


1105 


45204 


4546 












012642 


45514 














IPURUP 


012560 


4530 


45364 












IQUES 


001170 


10104 


4640 


4708 


4757 


4773 


4690 




IROCH) 


015434 


47214 


5138 












IROOEC" 


•••••• u 


5140 














IROLIN 


013554 


47494 


5139 














u 


5140 














IROSZ ■ 


000010 


47424 














IRTNM) 


012464 


45114 














IR2A ■ 


u 


5140 














ISAVLE' 


177777 


1# 


29894 


29904 


32024 


32064 


32444 


32454 






42834 


42874 


43234 


43274 


43314 


43354 




ISAVRE" 


•••••• u 


5140 














ISAVM 


012656 


4529* 


4537 


4538* 


4539* 


45574 






tSCOPE 


014374 


1097 


49044 












•SETUP- 


000137 


10664 


1096 


1097 


1099 


1101 


1103 


1105 






4645 


4779 


4851 


4877 


4885 


4905 




•SSKO ■ 


000236 


29694 


2990 


32024 


3206 


32444 


3245 


36674 






4267 


43234 


4327 


43314 


4335 






ISTUP • 


177777 


106S# 














ISVLAO 


014602 


4915 


49444 












•SVPC - 


000204 


9414 


946 












•SM ■ 


167400 


1# 


689 


693 


694 


695 


696 


697 






1107 


1109 


1110 


1193 


1256 


1340 


1417 






1924 


1957 


1991 


2046 


2137 


2226 


2315 






2901 


3031 


3171 


3342 


3466 


3641 


3739 






4510 


4512 


4554 


4842 


4843 


4844 


4845 






4896 


4897 


4898 


4899 


4900 


4906 


4918 






4934 


4935 


4947 


4950 


4953 






tSUREG 


001216 


10304 


1130 












IStfWW- 


000000 


699 


700 


4900 


4901 


4922 






tTAGLE- 


177777 


1« 


12084 


12194 


12234 


12314 


12624 


12664 






13264 


13304 


13504 


13544 


13664 


13704 


13834 






14524 


14654 


14694 


14844 


14884 


15094 


15134 






15764 


1S604 


15894 


15934 


160S4 


16094 


16224 






16B5* 


16964 


17024 


17174 


17214 


17414 


17454 






18174 


18214 


18334 


16S74 


18504 


18544 


18694 






19794 


19984 


20034 


20134 


20264 


20524 


20594 






21434 


21484 


21664 


21724 


21864 


21924 


22064 






22824 


22964 


23024 


23214 


23264 


23444 


23504 






24454 


24494 


24634 


24674 


24724 


24764 


24894 






25744 


25934 


25974 


2^164 


26214 


26534 


26574 






27514 


27554 


27704 


27744 


28134 


28174 


28314 






29124 


29274 


29304 


29344 


29354 


29384 


29404 






29654 


29874 


29894 


29964 


30014 


30134 


30174 






31354 


31454 


31504 


31554 


31764 


31804 


31854 






32294 


32344 


32354 


32414 


32444 


32504 


32534 






32814 


32824 


33884 


33924 


33974 


33984 


34034 






35354 


35394 


35414 


35624 


35674 


35984 


36024 






36714 


37154 


37224 


37244 


37254 


37444 


37494 






38264 


38494 


38534 


39244 


39254 


39354 


39394 






40354 


40404 


40664 


40704 


40964 


41004 


41054 



SEQ 140 



36674 


36714 


37714 


37754 


42264 


4^274 


1106 


1107 


1109 


1136 


1139 


4488 


3671 


37714 


3775 


42264 


4227 


42834 


698 


699 


1007 


1008 


1009 


1106 


1504 


1571 


1656 


1732 


1808 


1691 


2406 


2506 


2610 


2692 


2784 


2843 


3841 


4061 


4125 


4483 


4489 


4504 


4846 


4855 


4862 


4874 


4878 


4890 


4920 


4921 


4924 


4925 


4926 


4933 


12744 


12784 


12904 


12944 


13074 


13114 


13874 


14024 


14064 


14324 


14364 


1448* 


15234 


15274 


15394 


15434 


15554 


15594 


16264 


16414 


16454 


16654 


16694 


16814 


17574 


17614 


17744 


17764 


17934 


17974 


18734 


190S4 


19124 


19364 


19454 


19664 


20774 


20634 


20974 


21034 


21174 


21234 


22129 


22324 


22384 


22564 


22^* 


22764 


23644 


23704 


23644 


23904 


24124 


24184 


24934 


25124 


25184 


25464 


25504 


2S704 


26754 


26794 


26994 


27034 


27294 


27334 


28354 


28714 


28754 


26884 


28924 


29084 


29484 


29584 


29674 


29694 


29734 


29764 


30684 


30774 


30864 


30974 


31074 


31154 


31894 


32014 


32034 


32064 


32244 


32264 


32544 


S2604 


32634 


32644 


32714 


32734 


34054 


3430r 


34344 


35244 


35284 


35344 


36084 


36094 


36134 


36154 




36684 


37704 


37724 


37754 


38154 


38224 


38254 


39774 


39814 


40144 


40184 


40244 


40294 


41094 


41864 


41904 


41944 


41954 


41984 



rMINDEC-ZZ-CVOVA 0 
CVOVAO.Pll 12-A 



ITAGNU- 000251 



ITEMP ■ 000300 



NACni 


30A( 1052) 


12-JU 


L-84 09:52 PAGE 


144 












SEQ 141 


05:04 




CROSS REFERENCE 


TABLc 


USER SYMBOLS 














4204# 


4206# 


4211 


42264 


42364 


42394 


42024 


42844 


42874 


42924 


42934 


43224 


43244 


4527# 


4390* 


43324 


43354 


Mwm^ » 


43374 


43394 


43404 


44164 


44194 


44224 


44264 


44274 


44S4# 


4445# 




44554 


##3 f • 














1* 


1207 


12084 


1218 


12194 


1261 


12624 


1273 


1274* 


1269 


12904 


1306 


13074 


1S25 


13264 


1349 


13504 


1909 


13664 


1382 


13834 


1401 


14024 


1431 


14324 


1447 


i44a# 


1464 


14654 


1483 


i4644 


1508 


15094 


1522 


15234 


1538 


15394 


1554 


15554 


1575 


1576* 


1586 


15894 


1604 


16054 


1621 


16224 


1640 


16414 


1664 


16654 


1660 


IMI* 


1697 


16984 


1716 


1717# 


1740 


17414 


1756 


17574 


1773 


17744 


1792 


17934 


1816 


1617* 


1832 


18334 


1649 


18504 


1868 


13694 


1902 


19034 


1935 


19364 


1967 


1966# 


1997 


19984 


2012 


20134 


2051 


20524 


2076 


20774 


2096 


20974 


2116 


21174 


2142 


2143# 


2165 


21664 


2103 


21864 


2205 


22064 


2231 


22529 


2255 


22564 


2275 


2276# 


2295 


22964 


2320 




2343 


23444 


2363 


23644 


2383 


23844 


2411 


24124 


2444 


2445# 


2462 


24634 


2471 


24724 


2^ 


248'>4 


2511 


25124 


2545 


25464 


2569 


2570# 


2592 


25934 


2615 


2610V 


2652 


26534 


2674 


26754 


2698 


26994 


2728 


27294 


2750 


2751# 


27^9 


27704 


2012 


28134 


2830 


28314 


2870 


28714 


2887 


28884 


2907 


2906# 


2926 


29274 


2929 




2933 


29354 


2941 


2944 


29454 


2947 


2948* 


2966 


2%7# 


2966 


29694 


2972 


£9199 


2975 


29764 


2995 


29964 


3012 


30134 


3067 


30664 


5005 


30664 


3106 


31074 


9194 


31354 


3149 


31504 


3175 


31764 


3184 


9105* 


3200 


S201* 


3202* 


3205 


32064 


9229 


32244 


3225 


32264 


3228 


32294 


3233 


9235* 


3249 


3250# 


3252 


32544 


S257 


9259 


32604 


3262 


32644 


3387 


3388* 


3391 


3992* 


■ ■ JA J 

3396 


5596# 


5429 


34304 


SS2S 


9324# 


SS27 


SS284 


3SS3 


35354 


3561 


35624 


9597 


35984 


3601 


36024 


3607 


36094 


9665 




36674 


3670 


36714 


3714 


37154 


3749 


37444 


3769 


37704 


37714 


3774 


9f ro9 


3814 


38154 


3848 


38494 


3923 


39244 


3926 


3929 


3930* 


3934 


393D4 


3976 




4013 


40144 


4017 


4018* 


4034 


40354 


4065 


40664 


4095 


4096# 


4104 


41054 


A 1 CI A 

4131# 


4185 


41864 


4189 


4190* 


4193 


4195* 


4209 


A A A 

42044 


4235 


42364 


42584 


4281 


*2B24 


42834 


4286 


42874 


4307* 


4321 


43224 


AV%WA 

4929* 


4326 


4S27# 


4329 


43304 


43314 


4994 


4SSS4 


4368* 


4406* 


4415 


4416* 


4418 


AA 4 AA 

44194 


MM^9 

4421 


4422# 


4425 


44274 


4444 


AAAAA 


















1154# 


11554 


11614 


11624 


1 1 A^A 

11649 


11654 


11664 


1167* 


11694 


11704 


117X4 


9 9 

11734 




1176# 


11774 


11794 


11804 


11024 


11834 


11844 


1196* 


11974 


11994 


12004 


12014 


12024 


1203# 


12044 


12054 


12064 


12U99 


12104 


12124 


1213* 


12234 


12264 


12274 


4 ^^tf A 


4 ^VAA 

12904 


1231# 


1232 


12364 


12374 


1299# 


12404 


12414 


1263* 


12644 


1266* 


12694 




4 ^7AA 

127H# 


1263# 


1284# 


12854 


12864 


lc9»4 


12994 


13004 


1302* 


13034 


13114 


13164 


1517# 


4 V4 AA 

19194 


1S20# 


13904 


13454 


13464 


4 WKAA 


1SS94 


1360* 


1361* 


1362* 


1370* 


13754 


157e# 


4 V7AA 

197B4 


1S79* 


13874 


1392* 


13934 


19954 


13964 


1406* 


1427* 


14284 


1436* 


14414 


1442* 


4 AA VA 

144 94 


1444# 


1452* 


14S7* 


1458* 


14€W# 


14614 


14694 


1474* 


147S4 


14774 


1478* 


4 AAAA 

140O4 


Id AA 


1S11« 


15134 


15164 


15174 


l9lOV 


15194 


1527* 


1532* 


15334 


15354 


1536* 


4 AA VA 

1549* 


4 A^AA 


1549* 


15504 


15514 


15594 


l3f f # 


15784 


15804 


15844 


15854 


15934 


1598* 


1^994 


4 A^^A 


1601* 


16094 


16144 


16154 


4^4 ^A 

lei f# 


16184 


16264 


16314 


16324 


16344 


1635* 


4 AACA 




1661# 


16694 


16744 


16754 


16764 


16774 


16854 


16904 


16914 


1693* 


16944 


4 7A^A 

1 f^i£9 


4 7^A^ 


1707# 


17104 


17114 


17214 


17964 


17374 


17454 


17504 


17514 


1752* 


17534 


4 ^A4 A 
17614 


4 7&iLA 

1 r oev 


1767* 


17694 


17704 


17784 


17094 


17844 


1786* 


17874 


17974 


1812* 


18134 


4 A^4 A 

10214 


4 A^AA 


1S27# 


18284 


18294 


18374 


4 MA'%A 

10424 


18434 


18454 


18464 


18544 


1859* 


18604 


4 AA^A 

10624 


1 A^ «A 


1673# 


18994 


19004 


19124 


4 OV4 A 

19914 


19324 


19454 


19644 


19654 


1979* 


20004 


^\A4 A 

2001V 




2006# 


20094 


20264 


20564 


2057# 


20594 


20684 


20694 


20724 


2073* 


2083* 


^AAAA 




2092* 


20934 


21034 


21084 


04 


21124 


21134 


21234 


21454 


21464 


2148* 


OtKIA 


31 <UIA 


2161# 


21624 


21724 


21774 


^4 ^AA 


21814 


21824 


21924 


21974 


21984 


22014 




331 3A 


22S5# 


22364 


22384 


22474 


AA 

22404 


22514 


22i29 


22624 


22674 


2268* 


22714 






2287# 


22884 


22914 


22924 


29024 


23234 


2324* 


23264 


23354 


2336* 


23394 




3XCAA 


2SSS# 


23564 


2SS94 


23604 


2970V 


23754 


2376* 


23794 


23804 


2390* 


24154 


c^iev 


3A1 AA 


2426# 


24294 


24314 


24324 


24404 


24414 


24494 


24554 


24564 


24594 


24604 


>AX7A 




2461# 


24824 


24854 


24864 


24994 


25154 


25164 


25184 


2528* 


2529^ 


25324 


Va 

c399# 


3CA1 A 


25*29 


25504 


25554 


25564 


23604 


25614 


25744 


25794 


2580* 


25834 


25844 


3C07A 


3^1 JIA 


2619* 


26214 


26334 


26344 




26364 


26394 


26404 


26434 


26440 


26574 


P6tk^9 


96&3# 


2665* 


26664 


26794 


27004 


27014 


27034 


2705* 


27064 


27134 


27144 


2733* 


2737* 


27384 


2744* 


27454 


27554 


27744 


27894 


27904 


2792* 


27934 


27964 


2797# 


^A 1 Y A 

20174 


28229 


262 34 
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28SS« 
2912* 
29S6# 
29e7# 
3062* 
S119« 
3189* 
3213* 
S2Sa# 
3277# 
3353* 
33764 
34414 
34794 
SS5S4 
3S#0« 
36154 

37194 
37664 
36224 
36904 
391S4 
39664 
40204 
40704 
41774 
42064 
42764 
43194 
44234 

44574 

tTESTN 001200 10214 

1992* 
3172* 

• TIfCS 001160 10074 

1606* 
2323* 
2955* 
3719^ 
4953 

ITK8 001146 10004 
•TKS 001144 9994 
tTN - 00004^ 14 

14174 
1728 
19574 
2146 
2500 
2778 
3027 
3292 
37394 
4113 

I TPS 001152 10024 
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26464 


26494 


28504 


28514 


29144 


29154 


29164 


29174 


29374 


29364 


29404 


2943 


29694 


29904 


30014 


30064 


30634 


30744 


50754 


30774 


31204 


31244 


31254 


31424 


31924 


31934 


31944 


31954 


32144 


32164 


32174 


32194 


32394 


32404 


32414 


32444 


32764 


32794 


32614 


32624 


33544 


33564 


33574 


WA A .A 

33564 


33964 


33974 


34034 


34054 




34454 


34474 


34464 


34604 


34614 


34634 


34644 


S5S44 


35394 


35414 


AAX X M 

35444 


35714 


35754 


35744 


35614 


36174 


36164 


36194 


VX 'WkA 

96204 


36604 


36614 


S6664 


36714 


37204 


37224 


37244 


5725# 


37724 


37754 


37904 


V^A« M. 

57914 


36254 


36264 


36504 


VAA« m 

36514 


36914 


36924 


V AAA A 

36954 




39164 


39164 


39194 




39704 


39724 


39734 


vayaa 


40214 


40224 


40234 


X A'^X A 

40244 


40734 


40744 


40774 


X A^A A 

40764 


41764 


41794 


X 4 Aft a 

41604 


X 4 A4 A 

41914 


42114 


4212 


4214 


X <'%'^X A 

42244 


42644 


42674 


42664 


X ^ Art ■ 

42694 


43244 


45274 


43524 


A WAa 

43S54 


44244 


44254 


44264 


XX V%A 

44924 




44444 


44454 


XXX^A 

44474 


4456 


44614 


44624 


X AX VA 

44694 


1194« 


1257* 


1341* 


4 X • A A 

1416* 


2047* 


2136* 


2227* 


2916* 


3343* 


3467* 


3642* 


V^X A^ 

3740* 


1106* 


1193* 


1256* 


1263* 


1891* 


1924* 


1957* 


1991* 


2406* 


2415* 


2506* 


2515* 


2962* 


3031* 


5074* 


9094* 


3739* 


3746* 


VA9 


9641* 


4643 


4654 


XX^4 

4671 


4725 


4643 


4652 


4666 


XX A^ A 

4692* 


669 


1186 


6 6 AV A 

11954 


6 6 AA 

1194 


• AAA 

1416 


1495 


6 KAX A 




17S24 


1733 


« AAA 

1804 


6 AAA A 


1958 


1967 


6 4^fc« A 


1992 


2220 


22264 


2227 


^<%wx 

2296 


25064 


2507 


2516 


26O0 


27644 


2765 


2699 


26494 


90914 




yQ to 




3333 


33424 


3343 


3459 


3740 


3747 


3620 


3636 


4121 


41254 






4629* 


4640 







145 
















USER SYnBOLS 














26564 


26574 


28754 


28834 


26644 


28924 


29094 


29104 


29164 


29194 


29244 


29254 


29314 


29324 


29334 


29344 


29534 


29544 


29554 


29564 


29564 


29624 


29634 


29654 


30094 


30174 


30354 


30364 


30424 


30434 


50524 


30534 


30624 


30634 


30944 


30954 


30974 


31014 


31024 


31154 


31434 


31454 


31554 


31774 


31784 


31604 


31864 


31874 


31964 


31974 


32034 


32064 


32074 


i2064 


32104 


32114 


32204 


32214 


Z222* 


32314 


32324 


32334 


32344 


32374 


32454 


32524 


V^A« M 

32534 


32624 


32634 


32714 


32734 


32764 


32644 


32664 


32894 


32904 


33464 


33474 


33504 


33514 


33594 


33604 


33614 


33624 


33654 


33654 


33664 


33754 


34094 


34104 


34124 


A X • Vx 

34134 


34154 


34164 


34344 


34404 


54494 


34714 


34724 


34734 


34744 


34754 


34764 


34764 


34664 


34674 


34964 


A X tfk"6 A 

34974 


35104 


35114 


35164 


35194 


35454 


35474 


35464 


35564 


35594 


35644 


35654 


35674 


35824 


35644 


35654 


35664 


35874 


36074 


36064 


36134 


36234 


36244 


36274 


36284 


36S04 


36314 


36524 


36454 


3ft8C4 


S6674 


36964 


36994 


37064 


37064 


37094 


37104 


37294 


37304 


A^XX X 

37464 


A4X 4X 

37474 


A^X AX 

37494 


A^A^ A 

37524 


37534 


87654 


38024 


38034 


38064 


36064 


38094 


38104 


38194 


36204 


38534 


38604 


38814 


38834 


38644 


38854 


38864 


38894 


38964 


38994 


39014 


39024 


39054 


39064 


39114 


39124 


3928 


39394 


39424 


39434 


39444 


39454 


39654 


39664 


39604 


39614 


40004 


40014 


40034 


40054 


40074 


40094 


40274 


40284 


40294 


40374 


40364 


40404 


40674 


40664 


40624 


40634 


40854 


40864 


41004 


41094 


X • ^A X 

41754 


41764 


41924 


41934 


41944 


41964 


X • A^X 

41974 


41964 


42064 


X M 

42074 


42254 


42264 


42274 


42394 


42504 


42724 


42734 


42744 


42904 


42914 


42924 


42934 


42954 


42964 


43004 


X V 4 Ax 

43164 


4SS66 


43374 


45394 


43404 


43454 


43614 


43624 


44014 


44334 


44344 


44364 


44374 


44364 


44394 


44404 


XX X 4 A 

44414 


€44B4 


44494 


44504 


445 14 


44524 


44534 


44544 


44554 


4464 # 


44724 














1505* 


1572* 


1657* 


1733* 


1809* 


1692* 


1925* 


1956* 


2407* 


2507* 


2611* 


2693* 


2765* 


2644* 


2902* 


9092* 


3642* 


4062* 


4373 


4945* 










1340* 


1417* 


1504* 


1510* 


1571* 


1577* 


4 X KX A 

1656* 


1752* 


2000* 


2046* 


2056* 


2137* 


2145* 


2226* 


2235* 


2915* 


2610* 


2618* 


2692* 


2700* 


2764* 


2643* 


2901* 




3142* 


3171* 


3177* 


3186* 


3342* 


3466* 


3564* 


3641* 


3850* 


4061* 


4067* 


4125* 


4489* 


4933* 


4940 


4943* 


4731 
















4725 


4729 












1413 


12S0 


12564 


1257 


1264 


A A AX 

1336 


• VXAX 

13404 


• AX 4 

1341 


1511 


1566 


15714 


1572 


a A^A 

1578 


• X A A 

1652 


4 X AX X 

16564 




1609 


1867 


18914 


1892 


1920 


19244 


1925 


1959 


2001 


2040 


20464 


2047 


*MkA ^ 

2057 


2131 


V^A 

21374 


2196 


2310 


23154 


2316 


2324 


2396 


24064 


AX A^ 

2407 


2416 


2606 


26104 


2611 


2619 


cOOO 


AX AAA 

26924 


2699 




2644 


2895 


29014 


2902 


■Mk4 A 

2910 


2956 


2969 


90eO 


3113 


3143 


3156 


3164 


31714 


3172 


V « 7A 

9176 


916 ' 


34664 


3467 


9303 


9o9e 






3 > cv 




36414 


3642 


3651 


3947 


4055 


40614 


4062 


4066 
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< roct r 


vlUl 13 ' 


1 nrwtA 


4578 


4MO 






« TDC 

• TPb 








4640 






tTRAP 


015526 




CI (VIA 














CI 311 








• TUP ■ 




31e&v 


CI V>4 


SI Y14 


51X34 


C1XX4 

JX J 


4 TOO A A 




3111 


CI 3flA 








• T C a 

1 T 5XU • 




1 3AMA 


13X1 
XcdX 


XCvCw 


1966 


19744 

XC 


133* 


1 XM4 


i J r V 


1X11X4 

X JO 


1X1(7 

X JO » 






i*o*» 




X^V^r 


151X 

X JX J 


159X4 

X JC 










XW7 


16994 


1696 






171 7* 


1 7^1 

X ' 4»X 


17414 


1745 


17574 






103 > 




1854 


18694 


187X 

XO • J 






3A1 


3096 


905?4 


9059 


90774 






31 73 


31464 


?192 

CX7C 


99064 


9919 






3X31 A 


3X36 


3S444 


9X50 


9X644 

C<MV^V 








34794 




94894 


949X 

t ~ 7*^ 






>61M 


?&91 

KWCX 




9657 


P6754 






37 7A 

C f f* 


3S1 X4 


9817 
cox ( 


3SX14 

CO JXV 


CO J J 










9M74 


99A9 


PM64 

CTTWw 






5115 


51554 


5145 


31504 


5155 

«^X WW 






VMM 


5405 


54504 


5454 

^^^^ 


55244 






S79^ 




3749 


57704 


5772 






59774 


5961 


40144 


4029 


40554 






4226 


42564 


4259 

^fc«»7 


42824 


4284 






12194 

X£ X 7w 




29504 

& 7«^# ■ 


2954 


29554 






5405 


55264 


5554 


35354 


3539 






401S4 


4024 


41864 


4211 

^KX A 


4226 


iTCtrp ■ 




P97S# 


2967 


xpp4# 


5244 


52504 






~x^^ 


^X7^w 






490B 

~CVw 








2965 


52264 


5244 


52604 










52554 


X941 




ITSTfl 


















979# 

7 ■ 7w 


44M* 


4854 


4890 


4895 


ittytm 




4750 


4751 

^ • JX 


4768 


47724 




ITYPBN- 




VXi^^ 














49MkA 


5155 








(TYPE 




457M 


^wXW 


5121 


51^ 

<^X^ 7 




ITYPEC 




460S 


4615 


4622 


46274 


4628 


ITYPEX 






46SS 


46584 






ITYPOC 


VX JXC^ 




JX<^/ 








ITYPON 


vx vx^v 


5050 


50554 


5152 






1 TYPOS 


015100 


^^^w ■ 


5151 

WX wX 








lUNIT 


001206 


XVC~w 










lUNITM 


001010 












lUSUR 


001220 


xw<*x» 


Xt>wV 


1507 

x«w • 


1574 

X^ ' ~ 


1996 

X 77V 






52M 


5560 


5742 


4064 


4274 


IVECTl 


001244 


10564 


444P 








•VECT2 


001246 


10574 










IXTSTR 


0144C6 

WX * WW 


49094 










lYESNO" 


000001 


11724 

AX 


11754 

XX • 


11754 

AA • 


11764 


11784 






12S94 


12854 


12864 


1>024 


13034 






144S# 


14444 


14604 


14614 


14774 






16014 


16174 


161S4 


16S44 


16354 






17694 


17704 


17664 


17874 


18284 






20954 


21124 


21154 


21614 


21624 






22914 


22924 


25394 


23404 


23594 















SEQ 143 


l4b 
















USER SYMBOLS 














51344 


5135 


51364 


5157 


51384 


51394 


51404 




1278 


12904 


1 3CkA 




9 It 9 9 

1311 


4 7 m 

13264 


4 V A A 

1330 


13504 


14024 


1406 


l45c# 


14 do 


4 A A A A 

14464 


1452 


14654 


1469 


1527 


15394 


1545 




1339 


15764 


1580 


15894 


16414 


1645 


9 &^CA 




4 A a 4 A 

16ol4 


4 ^ AK 

1685 


16984 


1702 


1761 


17744 


1776 




1797 


18174 


1821 


18354 


19034 


1912 


19Se4 


9 AAC 


4 ft i* A A 

19684 


1979 


19984 


2005 


2083 


20974 


2103 


^9 9 ^A 

211 7# 


'^4 

2123 


21434 


4 A A 

2148 


21664 


22324 


2236 


39CC^ 




227o# 


2282 


22964 


2302 


2370 


23844 


c39U 


^A 9 ^ A 


<^A 9 

2410 


'^A ^ A A 

24454 


2449 


24634 


25124 


2518 


25404 


C350 


2570# 


2574 


25934 


2597 


2679 


26994 


2703 




2733 


27514 


2755 


27704 


28714 


2875 


26684 




290o# 


2912 


29274 


*^AA A 

2940 


3001 


30134 


9017 


7<%^ A A 


3077 


30864 


7AA^ 

3097 


V 4 A^ A 

31074 


31764 


3180 


91634 


V9 SA 

3169 


92014 


3203 


32064 


7 Am . 

926^ 


SS41 


35624 


mm ^ ^ 

9307 


359o# 


9613 


96664 


A 


96714 


37754 


3826 


9649V 




99244 


3925 


39354 


9999 


4040 


40664 


4070 


409b# 


4100 


A 9 AKa 

41054 


A 4 JWk 

4109 


A 9 AA A 

41664 


4287* 


4293 


49224 


A V^A 

4324 


492'4 


A 7 A A 

4940 


A A 4 A A 

44164 


A AK 7 

4457 


2938 


29694 


2989 


92064 


3281 


39924 


9997 


77AA A 

99964 


36024 


3606 


96094 


9619 


VA Y9 A 

36714 


9724 


37 f5# 


9625 


42874 


4292 


•3c»# 


4999 


A A 9 4^.^ 

44194 


4445 


A^ 

444o4 


4455 


3253 


32544 


*^7* 

9279 


97154 


9722 


96154 


9622 


A 4 AAA 

41904 


43304 


4352 


49954 


4937 


44224 


4426 


44274 


4454 


3263 


32644 


3271 


45554 


4356 








4922 


4944* 


4945 


4950 


4954 








4694 
















2050 


2141 


2230 


2319 


2410 


2510 


2614 


3174 


11794 


11814 


11824 


1226^ 


12274 


12294 


1 3XAA 


1 3X44 


13194 


13204 


4 4 A 

13614 


13o2# 


13704 


9 7^AA 

13794 


1 TOCA 
13934 


1 XQ&A 


14784 


15184 


4 K 4 

15194 


1535# 


15364 


15504 


1 CC1 A 
1331V 


1 &/V^A 


16764 


16774 


16934 


4 ^OA A 

16944 


9^9 AJL 

17104 


9 ^9 9 A 

17114 


1 7C3A 
1 r3cV 


1 7CXA 
1 r33V 


18294 


18454 


16464 


16624 


16694 


20724 


ev»34 




21614 


21824 


22014 


22024 


<^^C4 A 

22514 


22524 


99714 

CC « Xw 


99794 

CC ■ Cw 


23604 


23794 






34X3A 
C^3cv 


34C04 

C*3TfW 


24604 


24854 



V0V<M3 PU 12 ^ 
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MMGC> 000000 
MStTE< 000405 



««DST - 000067 
MFLAG- 000001 



MfftOW" 000000 



ttGCT4> 000000 
MLOC ■ 



05:0* 




C«»OSS «CrE«€NCE 


TABLE 


t«SER stwBas 






















25614 


C90dv 


944AA 
C909V 


26334 


26544 


26454 


26444 


26654 


26664 




2790# 




9*AO^ 


29144 


9Q1 4a 

c»19w 


9Q36A 

CY90V 


29374 


31964 


51974 


32024 


32034 


32574 


12W 


5259* 




3c09v 


32884 




9999 V 


55654 


35664 


35758 


35768 


34154 


34164 


VM6# 


5447* 






54864 


34JI7A 


34104 

99 1\^ 


55118 


55444 


55458 


55474 


55484 


55754 


5574# 


5561* 






35854 


341ULA 
99VOV 


3447A 

990 ' V 


36174 


36184 


56194 


56204 


56298 


36304 


S645* 








37074 




37094 

J ' v^v 


57108 


37298 


57508 


57528 


57558 


57714 


57 


5807* 






38104 


301 1 A 


3019A 

9vlCV 


59158 


59168 


59184 


59194 


59428 


59434 


5944* 


5945# 






39694 


j» '\^ 


3Q744 

3» ■ ^v 


59808 


40008 


40018 


40044 


40058 


40084 


4009* 


4027# 






40388 


40734 

*V ' JV 


4A74A 

'^ V 


40828 


40858 


42248 


42258 


42754 


42784 


42S5« 


4284* 






42904 


49914 


43944 

9c F JV 


42968 


45258 


43248 


45518 


45528 


45618 


4362* 


4449* 


JVw 


4441 A 


44524 


44434 


44444 

99 J9V 


44658 


44648 










41S1« 


4258« 






44068 


















121 7« 


1260« 




19IUIA 


13058 


1 394A 


13444 

1990V 


15648 


15618 


14008 


14308 


14468 


14638 


14«2« 


1507# 


1 <(91 A 


14V74 


15538 


14744 

19 '9V 


14474 
190 » V 


16058 


16208 


16598 


16638 


16798 


16968 


1715# 


1739# 


1 


1 7794 


17918 


IS144 
1019V 


14314 

1091V 


16488 


16678 


19018 


19548 


19668 


19968 


2011* 


2050* 


«V r 


90Q44 


21158 


31414 
C19 AV 


31444 

C1Q9V 


21648 


22048 


22508 


22548 


22748 


22948 


2S19« 


2342* 






24108 


344 S4 


34414 

C9VXV 


24708 


24678 


25108 


25448 


25668 


25918 


2614« 


2651* 






27498 


38994 


38844 


29068 


39268 




29674 


29718 


29748 


2994* 


3011« 






51058 


31334 


31444 


51748 


51658 


32248 


52278 


32468 


32568 


S2SM 


3S86* 


^^^^ 




55228 


343^ 

9«iCUV 


344A4 


55968 


36008 


57158 


57428 


36158 


36474 


5955# 


5975# 


4A19A 




40558 


4A444 


41034 


41668 


42028 


42548 


44174 


44208 




S28S* 


4275# 
























121 7# 


1219 




13AA4 


1262 


13444 


13734 
IC ' CV 


1274 


12784 


12668 


1290 


12948 


13054 


1507 


1511* 




1S3& 


15*608 


13444 


13M 


15548 


13648 


1566 


15708 


15618 


1565 


1567* 


1400# 


14A9 




14508 


1433 


14344 

19 ^^V 


14468 


1446 


14528 


14634 


1465 


14694 


14«2« 


1484 




14A74 


1509 


14134 
1919V 


14314 

19C1V 


1525 


15278 


15574 


1559 


15458 


15558 


1555 


1559# 




14711 
19 'O 


15808 


14474 

190 'V 


1449 

190» 


15938 


16038 


1605 


16098 


16208 


1622 


1626* 


1659* 


11141 


16444 


16638 


14&4 
1«09 


14U144 
ICW^v 


16798 


1661 


16658 


16968 


1696 


17024 


1715# 


1717 


17914 


1 7'V94 


1741 


17444 

1 '9JV 


17444 

1 '99V 


1757 


17618 


17728 


1774 


17764 


17918 


1795 


1797# 




1A1 7 


18218 


14314 
199 IV 


1433 


16578 


18468 


1650 


16548 


18678 


1869 


1875* 


1901* 




1019A 


19348 


1Q3JL 
1Y9P 


19444 

1^9 3V 


19668 


1966 


19798 


19968 


1996 


20054 


2011* 


2015 






2052 


30494 


30744 

CV '9V 


2077 


20658 


20958 


2097 


21058 


21154 


2117 


2123* 


9141 A 


914'V 


21488 


91644 


CIVO 


21728 


21844 


2186 


21928 


22048 


2206 


2212* 


2250* 


99X9 




22548 


3346 


33634 


22748 


2276 




22948 


2296 


23028 


2519* 


2321 




9V49A 


2344 


334A4 


33634 


2564 


25708 


23828 


2564 


25908 


24108 


2412 


24;8« 




9444 
C9*9 


24494 


94614 


3443 


24678 


24708 


2472 


24764 


24874 


2489 


2495* 


2510* 


941 9 


941AA 


25448 


3446 


344A4 

C99W 


25668 


2570 


25744 


25918 


2595 


25974 


2614* 


2616 




3iL41 A 


2655 


36474 

C03 'V 


36734 

C« ' 9v 


2675 


26798 


26978 


2699 


27058 


27284 


2755* 


2749* 


9741 


97444 


2V698 


37744 

C ' '9V 


34134 
CO lev 


26178 


26298 


2631 


26558 


26708 


28754 


2886* 


2888 






2908 


34134 


39344 


2950 


29588 


29464 


2948 


29568 


29668 


2967* 


2969 


90714 


9973 


29748 


3974 


39AS4 

C JV 


29678 


29944 


2996 


50018 


30118 


3013 


5017* 


5066* 




S0774 


50848 


3A44 


30974 


51058 


5107 


51158 


51558 


5155 


51458 


514«« 


5150 


'VI 444 

•Ii93» 


31744 


5176 


314A4 


31434 


5165 


51698 


32238 


32248 


3226 


52278 


5229 


3241* 




1194A 


32568 


33444 


336A 


S2718 


S2738 


53668 


3366 


SJ908 


3392 


5405* 


3405* 






54948 


34334 


3434 
99C9 


55268 


3526 


35598 


55418 


35604 


3562 


5567* 


3S96* 






5602 


34134 


S41M 


57158 


5715 


57228 


57428 


3744 


57498 


5815* 


5815 


U994 


3A474 


5649 


34434 


39334 

9^9 9 V 


5955 


59598 


59758 


5977 


39618 


40128 


4014 


40168 


4A1 A 


4A944 


40298 


4A334 


4A34 

9V99 


40408 


40648 


4066 


40708 


40958 


41008 


410S* 


4105 




41M4 


4190 


41944 


43034 


4204 


42068 


42548 


4256 


42598 


44178 


4419 


4420* 


4422 


44348 


44558 
















50558 


1157# 


24348 


25358 


25638 


25868 


26468 


26688 


27168 


27618 


26028 


28618 


50458 




SS79* 




3401 4 
09vl V 


35158 


34494 


349^4 

JV 


36768 


36698 


57618 


37608 


57928 


56568 


4087* 


42194 


44284 






















4504* 

121S« 


1219 


1232* 


1233 


1261* 


1262 


12758 


1274 


12898 


1290 


15064 


1S07 


1K94 


1326 


1S49« 


1350 


13654 


1566 


15828 


1585 


14018 


1402 


14318 


1432 


14478 


1446 
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1464* 






1576 






1697# 






1617 






1997# 






2143 






2295# 






2445 






25«24 






2751 






29294 






2996 






51754 






5260 






55974 






5929 






40954 






4422 


OLOCN- 


000000 


41514 


»$nf TU- 


000000 


41514 


IIRTNI- 


000242 


41514 


t$RTN2« 


00024 S 


41514 


l»S«C • 


000027 


32854 


MTO • 


000000 


11574 






2671 






31274 






3656 






56364 


tOFiLL 


01552S 


5047* 


*1 


002126 


12074 


110 


002446 


1549 


1100 


00S260 


2S4S 


1101 


005S22 


2569 


*102 


005364 


2592 


IIOS 


005424 


2615 


tl04 


005512 


2652 


• 105 


005554 


2674 


«106 


005612 


2696 


• 107 


005660 


2728 


*11 


002474 


1365 


1110 


005706 


2750 


till 


005742 


2769 


*112 


006054 


2812 


*i:s 


006056 


2850 


*114 


006150 


2870 


*115 


006166 


2887 


*116 


006224 


2907 


• 117 


006244 


29264 


tl2 


002522 


1582 


1120 


006262 


2929 


*121 


006264 


2933 


(122 


006300 


2941 


*125 


006324 


2947 


*124 


006324 


29664 


♦ 125 


006370 


2968 


*i2e> 


006366 


2972 
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1465 


14834 


1484 


1508* 


1588* 


1589 


1604* 


1605 


1698 


17164 


1717 


17404 


1852* 


1855 


18494 


1850 


1998 


20124 


2015 


20514 


21654 


2166 


21854 


2186 


2296 


25204 


2521 


25454 


24624 


2465 


2471# 


2472 


2593 


26154 


2616 


26524 


27694 


2770 


28124 


2815 


2950 


29434 


2944 


2947* 


50124 


5015 


5067* 


5068 


5176 


51844 


5185 


52254 


5S874 


5S88 


55914 


5592 


5S98 


56014 


5602 


5714* 


59544 


5955 


59764 


5977 


4096 


4104* 


4105 


41894 


44584 


4459 






4255 


42584 


4502 


4507# 


4257* 


4241* 


4251 


42584 


42i7 


4250 


42584 


4297 


4242 


4252 


42584 


4501 


42754 








1158 


24544 


2457 


25554 


27184 


2724 


27614 


2767 


3150 


55794 


5582 


34234 


3657 


3676* 


5682 


36894 


5857 


5858 


4087* 


4095 


5051* 


5061 


50964 





1252 
15544 
25504 
25744 
25974 
26214 
2657* 
2C794 
27054 
27554 
13704 
27554 
2774# 
2817* 
28354 
28754 
28924 
29124 
2945 
1587* 
2934* 
29584 
2944* 
29584 
2989 
29904 
29e7# 



146 

yS£» SYMBOLS 



1509 


1522* 


1523 


15384 


1621* 


1622 


16404 


1641 


1741 


17564 


1757 


17734 


18684 


1869 


19024 


1903 


2052 


20764 


2077 


20964 


22054 


2206 


22514 


2232 


2544 


25654 


2564 


25854 


24884 


2489 


25114 


2512 


2655 


2674* 


2675 


26984 


28504 


2851 


28704 


2871 


2948 


29684 


2969 


29724 


50854 


5086 


51064 


5107 


5226 


52284 


5229 


52494 


54294 


5450 


55234 


5524 




374 S# 


1744 




40154 


4014 


40174 


4018 


4190 


42054 


4204 


42554 


4547 


45684 


4405 


44064 


4301 






43M# 


4500 


4507* 


4545 


45684 


4507* 


4546 


45684 


4402 


2558 


25654 


2566 


25864 


28024 


2808 


28614 


2867 


5426 


55014 


5507 


55154 


5695 


57614 


5762 


5763 


42194 


4222 


44284 


4429 



1539 


15544 


155S 


157S4 


16644 


1665 


16804 


1641 


1774 


17924 


1795 


16164 


19554 


1936 


19674 


1968 


2097 


21164 


2117 


21424 


22554 


2256 


22754 


2276 


2584 


24114 


2412 


24444 


25454 


2546 


25694 


2570 


2699 


27284 


2729 


27504 


28874 


2888 


29074 


2908 


2975 


29754 


2976 


29954 


5154^ 


5155 


31494 


3150 


5250 


52574 


3258 


32594 


55274 


5528 


35614 


3562 










40544 


4055 


40654 


4066 


4236 


44184 


4419 


44214 


4474 
















4401 


44064 


4465 


4472 


44064 


4473 






2589 


26464 


2649 


26684 


50454 


5048 


30554 


3056 


5516 


55894 


5592 


36554 


57804 


5786 


57924 


3798 
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t IP"* 


006 S66 


2975 


29854 


• X J 


002552 


1401 


14064 




006402 


2995 


30014 




006420 


3012 


3017* 




006534 


]^>67 


30774 




006562 


3085 


3097* 




006604 


3106 


31154 


* A 


006654 


3134 


31454 


• A 




3149 


31554 


1157 


006726 


3175 


31804 


1 14 

• A^ 


002622 


1431 


14564 


1 140 

▼ A ~ V 


006746 


3164 


31894 


1 141 

• A ^ A 


006776 


3200 


32054 




006774 


32014 


3281 


1 145 


007144 


3205 


32824 


1 144 


007034 


32234 


3244 


tl45 


007070 


3225 


52454 


tl46 


007056 


3228 


32544 


1147 


007066 


3233 


32414 


»15 


002650 


1447 


14524 


1150 


007102 


3249 


32534 


»151 


007126 


5252 


32754 


$152 


007124 


3257 


5259 


1153 


007126 


3262 


32714 


1154 


007416 


3387 


54054 


»i 55 


007414 


3591 


55974 


tl56 


007416 


5596 


54054 


»157 


007474 


5429 


34344 


• 16 


002676 


1464 


14694 


1160 


007754 


5525 


55414 


1161 


0077J2 


3527 


35344 


tl62 


007734 


5533 


35394 


1165 


007776 


5561 


35674 


tl64 


0\0104 


3597 


56154 


1165 


010102 


3601 


56084 


tl66 


010104 


3607 


56154 


1167 


010254 


3665 


56684 


»17 


002726 


1485 


14884 


»17C 


010232 




5724 


$171 


010360 


5670 


57254 


»172 


010356 


3714 


57224 


*175 


010424 


5745 


57494 


1174 


010470 


5769 


57724 




010466 


5770# 


3825 


1176 


010614 


5774 


56264 


1177 


010612 


5814 


36224 


tz 


002152 


1218 


12254 


120 


002764 


1508 


15154 


1200 


010652 


5848 


58534 


1201 


010764 


59234 


5928 


1202 


011000 


5926 


59294 


1203 


011010 


3934 


59394 


*204 


011070 


5976 


39814 


1205 


011150 


4013 


40294 


1206 


011144 


4017 


40244 


1207 


011164 


4054 


40404 



CROSS REFERENCE TABLE 



USER SYMBOLS 



52654 
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1522 


15274 


»<lv 


A1 1 3V) 


4065 


40704 






4095 


41004 


•etc 


A1 1 199 


4104 


41094 


* 31 V 


A1 1 1k4ik 


42S7 


42504 


A 31 A 


A1 1 1kSA 




42524 




A1 1 

X3XD 


4185* 


4226 


• clD 


01 14^9 


4212 


4214 

A^ 


1 31 7 


A1 ISlil 


41A9 


41944 






15M 


15434 


*33A 


Ol 1544 


4193 


41984 


• 331 


Ol 1962 

VX A^VC 


4203 


42084 


• 333 


Ol 1614 


42S5 


42394 


• 33 V 


Ol 1 TV) 


4297 


43004 


• 33^ 


Ol 1 TV) 


^<Mf A* 




• 39^ 


Ol 1714 
WX X • x^ 


4281 


42844 




011710 

VXX > XV 


42B24 


4292 


*cc ' 


011740 
vxx f^w 


4286 


42934 


*sA 


AAlAfti^ 
lWr^^W# 


1554 


15594 


• CSV 




43454 








4S464 






oil 776 


4S21 


4S244 


•911 


oil 779 

VXX > >C 


4S224 


4SS9 


1914 


012092 


4326 


45404 




012010 


4S29 


4SS24 




012006 


4330* 


4336 


•2S7 




4354 


43374 


•24 


005124 


1575 

A^ * » 


15804 






44014 








44024 




IMP 




4465 


44724 


I24S 




44734 




•244 




44154 


4458 






4410 

AW 


44454 


•246 


012250 


4421 


44264 


1247 


012256 


4425 


44344 


125 


00S144 


15M 


15934 


1250 




4444 


44554 


126 


00S172 


1604 


16094 

AW 


127 


00S220 


1621 

A A 


16264 


13 


002264 


1261 

ASwA 


12664 


130 


003250 


1640 

A V * W 


16454 


131 


003306 


1664 


16694 


132 


003354 


1680 


16854 


133 


003362 


1697 


17024 


134 


003412 


1716 

A • AV 


17214 

A ■ CAV 


135 


003450 


1740 


17454 


t36 


003476 


1756 

A • 


17614 


13/ 


003524 


1773 


17784 

A ■ > WW 


•4 


002304 


1273 


12784 


t40 


003554 


1792 

A ■ 


17974 


I40CAT* 


•••••• 0 


4864 


4906 


(41 


0036 12 


1816 


18214 


♦42 


003640 


1832 


18374 


143 


003666 


1649 


18544 


•44 


003716 


1868 


18734 



42274 
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SEQ 148 



t45 


003756 


1902 


1912* 






;46 


004016 


1955 


1945# 






t47 


004056 


1967 


1979# 






ts 


002332 


1289 


1294# 






t50 


004114 


1997 


2005« 






til 


004136 


2012 


2026* 






t52 


004174 


2051 


2059# 






»53 


004222 


2076 


2085* 






»54 


004250 


2096 


2105« 






155 


004276 


2116 


2125* 






156 


004354 


2142 


21484 






157 


004362 


2165 


21724 






)6 


002360 


1506 


15114 






160 


004410 


2185 


21924 






<61 


004436 


2205 


22124 






t62 


004474 


2251 


2258# 






*63 


004522 


2255 


22624 






»64 


004^50 


2275 


22824 






»65 


004576 


2295 


25024 






t66 


004634 


2520 


25264 






»67 


004662 


2545 


25504 






17 


002410 


1525 


15504 






170 


004710 


2565 


25704 






»71 


004736 


2585 


25904 






%12 


004774 


2411 


24184 






173 


005054 


2444 


24494 






$74 


005102 


2462 


24674 






175 


005114 


2471 


24764 






176 


005142 


2488 


249S4 






$77 


005200 


2511 


2518* 






■ 


015406 


928# 


9524 


941 


9424 






ioe6* 


1394 


1109 


1110 






1289 


1290 


1506 


1507 






1402 


1451 


1452 


1447 






1558 


1559 


1554 


1555 






1641 


1664 


1665 


1680 






1775 


1774 


1792 


1795 






1905 


1955 


1956 


1967 






2096 


2097 


2116 


2117 






2252 


2255 


2256 


2275 






2585 


2584 


2411 


2412 






2512 


2545 


2546 


2569 






2698 


2699 


2728 


2729 






2871 


2867 


2886 


2907 






2972 


2975 


2975 


2976 






5107 


5154 


5155 


5149 






5249 


5250 


5257 


5258 






5525 


5524 


5527 


5528 






5744 


5814 


5815 


5848 






4017 


4018 


4054 


4055 






4205 


4204 


4255 


4256 






4512 


4516 


4552 


4556 






5020# 








, $ASTA. 


ij 


4785 


4786 






. $x 


001000 


953« 


958 







9444 


9464 


9474 


955 


9544 


9564 


9584 


9764 


1015 


11524 


1218 


1219 


1252 


1255 


1261 


1262 


1275 


1274 


1525 


1526 


1549 


1550 


1365 


1366 


1582 


1585 


1401 


1448 


1464 


1465 


1485 


1484 


1508 


1509 


1522 


1523 


1575 


1576 


1588 


1589 


1604 


1605 


1621 


1622 


1640 


1681 


1697 


1698 


1716 


1717 


1740 


1741 


1756 


1757 


1816 


1817 


1852 


1855 


1849 


1850 


1868 


1869 


1902 


1968 


1997 


1998 


2012 


2015 


2051 


2052 


2076 


2077 


2142 


2145 


2165 


2166 


2185 


2186 


2205 


2206 


2251 


2276 


2295 


2296 


2520 


2521 


2545 


2544 


2565 


2364 




2445 


2462 


2465 


2471 


2472 


2488 


2489 


2511 


2570 


2592 


2595 


2615 


2616 


2652 


2655 


2674 


2675 


2750 


2751 


2769 


2^70 


2812 


2815 


2850 


2851 


?870 


2908 


2929 


2950 


2945 


2944 


2947 


2948 


2968 


2969 


2995 


2996 


5012 


5015 


5067 


5068 


5085 


5086 


5106 


5150 


5175 


5176 


5184 


5185 


5225 


5226 


5228 


5229 


5259 


3260 


55254 


5587 


5588 


5591 


5592 


5429 


5450 


5561 


5562 


5597 


5598 


5601 


5602 


5714 


3715 


5745 


5849 


5928 


5929 


5934 


5955 


5976 


5977 


4013 


4014 


4065 


4066 


4095 


4096 


4104 


4105 


41294 


4189 


4190 


45724 


45854 


45914 


4416 


4419 


4421 


4422 


4458 


4459 


4640 


4645 


47724 


4775 


4779 


48514 


4890 


4955 


4954 
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CVOVAO 


Pii 


BEGIN 


1* 


BGNHRO 


14 


BG»*« 


14 


BGNINI 


14 


BG»t100 


14 


BGM1SG 


14 


BGNSFT 


14 


BGNSRV 


14 


BGNSUB 


14 




1531 




1825 




2286 




2821 


BGNSU 


14 


BRESET 


14 




3907 


CALL 


14 




3379 


CASE 


14 


CKLOOP 


14 


CLRVEC 


14 


COMMEN 


14 


OECR 


14 


OECRU 


14 


OEFAUL 


14 


OEVREG 


14 


OEVTYP 


14 


OISPAT 


14 


ELSE 


14 


EM) 


14 


EM>aN 


14 


ENTCOn 


14 


EICOEC 


14 


ENDOO 


14 


END»«0 


14 


ElOHU 


14 


ENOIF 


14 




1512 




1777 




2147 




2475 




2874 




3188 




3852 


ElOINC 


14 


EWINI 


14 


ENDLOO 


14 


Eicnoo 


14 


EICMSG 


14 


EWWTN 


14 


ElOSEL 


14 


ElOSFT 


14 


ENOSRV 


14 


EIOSU8 


14 




1544 




1838 



4147 



3959 3994 

1208 1268 

1547 1583 

1841 1858 

2334 2354 

2849 3034 

1184 1321 
4110 

U56 2434 

23 3500 

1674 1914 

1233 3441 
8114 



4351 
1282 
1597 
1898 
2374 
3081 

1397 

2535 
3513 

1947 
3624 



1298 1315 

1613 1630 

1930 1963 

2427 2454 

3100 3118 



1479 

2563 
3589 

1980 



1636 

2586 
3654 

2028 



1344 


1358 


1374 


1391 


1426 


1440 


1456 


1473 


1515 


1659 


1673 


1689 


1705 


1735 


1749 


1765 


1782 


1811 


2007 


2067 


2087 


2107 


2156 


2176 


2196 


2246 


2266 


2480 


2527 


2554 


2578 


2638 


2661 


2704 


2736 


2791 


3361 


3408 


3477 


3557 












1712 


1788 


1364 


1909 


1942 


1976 


2023 


2825 


3435 


2646 


2668 


2717 


2760 


2801 


2860 


3045 


3055 


3127 


3675 


3688 


3760 


3779 


3791 


3855 


4086 


4219 


4427 



2932 

8114 

2988 



1222 
1526 
1796 
2171 
2492 
2891 
3240 
3938 
3280 

4225 



4249 



3987 
1224 
1560 
1855 



3232 



3243 



3251 



3261 



3395 



3532 



4192 



4424 



4443 



1265 


1277 


1293 


1310 


1329 


1353 


1369 


1386 


1405 


1435 


1451 


1468 


1487 


1542 


1558 


1579 


1592 


1606 


1625 


1644 


1666 


1684 


1701 


1720 


1744 


1760 


1820 


1836 


1853 


1872 


1911 


1944 


1978 


2002 


2025 


2058 


2082 


2102 


2122 


2191 


2211 


2237 


2261 


2281 


2301 


2325 


2349 


2369 


2369 


2417 


2448 


2466 


251. 


2549 


2575 


2596 


2620 


2656 


?678 


2702 


2732 


2754 


2773 


2816 


2834 


2911 


2937 


2957 


2964 


2966 


3000 


3016 


3076 


3096 


3114 


3144 


3154 


3179 


3270 


3272 


3402 


3404 


3433 


3536 


3540 


3566 


3612 


3614 


3721 


3748 


3621 


3960 


4023 


4028 


4039 


4069 


4099 


4108 


4197 


4207 


4238 


4433 


4454 




3723 


3824 


4291 


4335 


4338 


















4299 


4344 


4400 


4471 




















4047 


4362 


















1470 


1489 


1538 


1279 


1295 


1312 


1331 


1355 


1371 


1386 


1407 


1437 


1453 


1594 


1610 


1627 


1646 


1670 


1686 


1703 


1722 


1746 


'762 


1779 


1798 


1822 


1875 


1915 


1948 


1981 


2029 


2084 


2104 


2124 


2173 


2193 


2213 


2263 


2283 



CVOVAO.Pll 



EWSU 
E«TST 



EQUALS 
EWWHRO 



ERROR 



ESCAPE 
EXIF 
EXIFB 
EXIT 



G£TPRI 

GETSyR 

GPHARO 

GPRTIA 

GWWO 

GPffft. 

»€AOER 

IF 



IFB 

IFCONO 

IF. ERR 

IF. NO. 

INCR 

INCRU 

INLINE 

LASTAO 

LEAVE 

LET 



2503 
2836 
1* 
1* 
2214 
3630 
1* 
!• 
!• 
1556 
1851 
2545 
2614 
3400 

705# 
1541 
1635 
2296 
2772 
3394 
1* 
!• 
!• 
!• 
2954 
3649 
1* 
1* 
1* 
1* 
1* 
1* 
1* 
1* 
1506 
1771 
2140 
2469 
2945 
3365 
4015 
1* 
1* 
1* 
1« 
1* 
1« 
1* 
!• 
1# 
1* 
1202 
1299 
1459 
1616 
1763 
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SEQ 


150 


Q 
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S0A( 1052 ) 
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CROSS 


REFERENCE 


TABLE 


MACRO 


NAMES 














2351 


2371 


2391 


2451 




2494 


2551 


2575 


2596 


2656 


2660 


2734 


2775 


2819 


2876 


3078 


3096 


3116 


3156 


3406 


3437 


3548 


3620 










1244 


1332 


1406 


1490 


1561 


1647 


1723 


1799 


1876 


1916 


1949 


1962 


2030 


2125 


2304 


2392 


2495 


2601 


2661 


2776 


2637 


2693 


3023 


3160 


3326 


3451 


3634 


3730 


4050 


4119 


























1220 
1275 


1291 


1306 


1327 


1351 


1367 


1304 


1403 


1433 


1449 


1466 


1485 


1524 


1540 


1590 


1606 


1623 


1642 


1666 


1662 


1699 


1718 


1742 


1758 


1775 


1794 


1616 


1634 


1870 


1906 


1939 


1969 


2015 


2078 


2096 


2118 


2167 


2187 


2207 


2257 


2277 


2297 


2365 


2365 


2446 


2464 


?473 


2490 


2547 


2571 


2594 


2654 


2676 


2730 


2752 


2771 


2632 


2672 


2669 


2950 


2978 


2997 


3014 


3069 


3086 


3109 


3136 


3151 


3266 


3393 


3431 


3529 


3536 


3603 


3610 


3716 


3616 


3936 


4097 


4106 










1221 


1276 


1292 


1309 


1326 


1352 


1566 


1365 


1404 


1434 


1450 


1467 


1466 


1525 


1557 


1591 


1607 


1624 


1643 


1667 


1663 


1700 


1719 


1743 


1759 


1776 


1795 


1819 


1652 


1671 


1907 


1940 


1970 


2016 


2079 


2099 


2119 


2166 


2166 


2206 


2258 


2278 


2346 


2366 


2366 


2447 


2465 


2474 


2491 


2546 


2572 


2595 


2655 


2677 


2731 


2753 


2615 


2633 


2673 


2690 


2951 


2979 


2996 


3015 


3070 


3069 


3110 


3137 


3152 


3269 


3401 


3452 


3530 


393 r 




3611 


3717 


3617 


3937 


4096 


4107 








611* 




























4210 




























1262 


1509 


1576 


1999 


2055 


2144 


2234 


2322 


2414 


2514 


2599 


2617 


2699 


2906 


2961 


3019 


3073 


5093 


3112 


3141 


3157 


3176 


3165 


3291 


3563 


3716 


3745 


3616 


3946 


4066 


4112 

























611* 
611* 



1139« 



1216 


1259 


1271 


1267 


1304 


1323 


1347 


1363 


1360 


1399 


1429 


1445 


1462 


1520 


1536 


1552 


1573 


1566 


1602 


1619 


1636 


1662 


1676 


1695 


1714 


1736 


1790 


1614 


1630 


1647 


1666 


1900 


1933 


1965 


1995 


2010 


2049 


2074 


2094 


2163 


2163 


2203 


2229 


2253 


2273 


2293 


2316 


2341 


2361 


2361 


2409 


2442 


2466 


2509 


2543 


2567 


2590 


2613 


2650 


2672 


2696 


2748 


2626 


2665 


2905 


2970 


2973 


2993 


3010 


3065 


3063 


3104 


3132 


3147 


3173 


3162 


3226 


3247 


3369 


5427 


3521 


3525 


3559 


3595 


3599 


3712 


3741 


3612 


3646 


3932 


3974 


4032 


4063 


4187 


4416 


4419 


















4102 


4201 


4233 






















2727 


2766 


2611 


2669 


4094 


















3196 


3663 


3767 


4279 


4327 


















4319 


























1153 


1160 


1163 


1165 


1166 


1170 


1173 


1176 


1179 


1182 


1195 


1199 


1200 


1203 


1204 


1209 


1211 


1225 


1227 


1236 


1237 


1239 


1240 


1263 


1269 


1263 


1301 


1316 


1316 


1345 


1359 


1360 


1375 


1377 


1392 


1394 


1427 


1441 


1442 


1474 


1476 


1510 


1516 


1517 


1532 


1534 


1546 


1549 


1577 


1564 


1596 


1399 


1631 


1633 


1660 


1674 


1675 


1690 


1692 


1706 


1709 


1736 


1750 


1751 


1766 


1765 


1612 


1626 


1627 


1642 


1644 


1659 


1661 


1699 


1931 


1964 


2000 


2006 



1481 
1754 
2114 
2460 
2927 
3255 
4011 



1201 
1264 
145-' 
1614 
1766 
2056 
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2066 


2071 


2066 


2091 




2250 


2267 


2270 


2267 




24 39 


2455 


2456 


2461 




2634 


2639 


2642 


2662 




2650 


2655 


2662 


2909 




3041 


5051 


5061 


5074 




3206 


3209 


5212 


5215 




3352 


3556 


5557 


5556 




5447 


3446 


5471 


5472 




3546 


3556 


5564 


5569 




3644 


5659 


5665 


5697 




5619 


5650 


5879 


3662 




3945 


5964 


5967 


5971 




4061 


4064 


4174 


4176 




4560 


4422 


4451 


4455 


LOCAL 


1# 








LOOP 


1* 


4184 






MSG 


1166* 


1166 


12504 


1252 


2512 


25964 


2400 


25001 




34594 


5461 


56564 


5658 


MULT 


1* 


6114 






ICUTST 


14 


6114 


1166 


1250 




2040 


2151 


2220 


2510 




3636 


5755 


3636 


4055 


NOLOCA 


14 








POINTE 


14 








POP 


l# 


6114 


1241 


5449 


PftlNTB 


14 








PUSH 


14 


8114 


1254 


5442 


REPEAT 


1# 


1206 


2925 


5922 


REPORT 


14 


6114 






RETURN 


14 


4256 


4240 


4296 


ROUT IN 


14 


4149 


4256 


4505 


SAVR14 


14 








SCOPE 


7064 


1192 


1255 


1559 




2156 


2225 


2514 


2405 




5756 


5840 


4060 


4124 


SELECT 


14 








SETPRI 


14 


8114 


1420 


2421 


SETTRA 


51214 


5150 


5151 


5152 


SETUP 


14 


6114 


1066 




SETVEC 


14 


1196 


5555 


5470 


SKIP 


14 


8114 


1264 


1511 




2910 


2956 


2965 


5020 




5620 


5851 


S947 


4068 


SLASH 


14 


8114 






SPACE 


8114 








STARS 


14 


8114 


627 


829 




959 


972 


1015 


1016 




1415 


1494 


1495 


1502 




1606 


1861 


1864 


1567 




2044 


2150 


2151 


2155 




2504 


2605 


2606 


2606 




2699 


5026 


5027 


5029 




5639 


5754 


5755 


5757 




4269 


4504 


4515 


4550 
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TABLE - 


MACRO NAMES 




ClvO 


3111 


2145 


31 17 
CX3 < 


CiOv 


217/ 






2555 




3XH 


2556 






2526 






2555 




C iW 


2705 


371 3 


37X7 


2745 






2917 


303X 




2955 






5101 


XI 1 Q 

OXX7 


XI 3X 


5142 






5250 




X9XJI 


5275 


OS J7 




5362 


XXIkA 


XX7A 

Jw f ^ 


5409 






5475 


f o 




5462 






5565 




JOXD 


5616 






5719 


X79II 


X7AA 


5751 


3664 


5666 


3690 


5894 


3697 


5900 


Vf'O 




4002 




AA10 
^WXy 


4021 


4178 


4190 


4195 


4205 


4223 


4271 






4441 






4450 


14954 


1497 


15664 


1568 


20404 


2042 






C900 




c 'vv 


Cw7«#V 






40554 










X^Xd 


1495 


ISM 


XO JC 


1726 


2598 


2500 


2606 


2686 


2778 


2659 


4121 












5652 


4341 


4541 


4542 


4625 


4626 


5625 


4514 


4522 


4528 


4786 


4768 


4414 
























1416 


1505 


1570 


1655 


1731 


1607 






2691 




9M9 


2900 


4487 












2521 


2624 


5568 


5417 


3489 


5576 




9X99 


5137 


9X 


51S9 




1S7A 


£^A/X 


2057 


9146 


PPM 


2524 


5075 


5095 


5115 


3143 


3158 


5178 














IIA7 




667 


M9 


M9 


691 


XXwO 


XXYX 


1245 


1947 

XC^ ' 


19% 


1254 


IMS 


ISM 
x^w 


1569 


1651 

Xv^X 


1652 


1654 


1M9 


1990 


1922 


14S1 
xyjrf 


1955 


1966 


CCXT 


9990 


2224 






2513 


2665 


fcwww 


2690 


2777 


2776 


2782 


5165 


5164 


5169 


3552 


3555 


5540 


5835 


5856 


5859 


4054 


4055 


4059 


4357 


4368 


4406 


4415 


4479 


4518 









SEQ 151 




2160 


2197 


2200 


2255 


2247 


2575 


2576 


2415 


2426 


2430 


2559 


2579 


2562 


2616 


2632 


2766 


2792 


2795 


2622 


2647 


2952 


2955 


2962 


5007 


5055 


5177 


5166 


5191 


5193 


5195 


5277 


5285 


5266 


5545 


5549 


5411 


3414 


5459 


3444 


3445 


5465 


5495 


5509 


5517 


3545 


5622 


5627 


5628 


5650 


5651 


5764 


5789 


5601 


3605 


5806 


5904 


5910 


5914 


5917 


5941 


4026 


4056 


4067 


4072 


4076 


4273 


4287 


4289 


4294 


4317 


4452 


4460 


4462 
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5714 


5743 


5814 


5648 


5926 




4189 


4203 


4255 


4418 


4421 


4458 




ILET 


1« 


1154 


1161 


1164 


1166 


1169 


1171 

AA • A 




1202 


1203 


1205 


1209 


1212 


1226 


1228 




1299 


1302 


1516 


1519 


1545 


1559 


1361 

A ^^VA 




1460 


1474 


1477 


1510 


1516 


1516 


1532 




1617 


1651 


1654 


1660 


1674 


1676 


1690 

AW W 




1783 


1766 


1812 


1626 


1626 


1642 


1645 




2066 


2072 


2068 


2092 


2106 


2112 


2145 




2251 


2267 


2271 


2287 


2291 


2525 


2555 




2440 


2455 


2459 


2481 


2485 


2515 


2528 



- MACRO NAMES 



2275 


2295 


2320 


2343 


2363 


2383 


2411 

A A 


2444 


2615 


2652 


2674 


2698 


2728 


2750 


2769 


2812 


2945 


2947 


2968 


2972 


2975 


2969 


2995 


3012 

Afc 


5200 


3205 


3225 


3228 


5253 


3244 


3249 


3252 


5429 


5525 


3527 


3535 


3561 


3597 


3601 


3607 


5814 


5825 


3646 


5926 


5926 


5954 


3976 


4013 

^W A W 


4205 


4212 


4214 


4226 


4255 


4257 


4242 


4281 


4556 


4559 


4416 


4421 


4425 


4444 


4456 


4465 


1550 


1554 


1570 


1587 


1406 


1456 


1452 


1469 


1609 


1626 


1645 


1669 


1685 


1702 


1721 


1745 


1912 


1945 


1979 


2005 


2026 


2059 


2063 


2103 


2262 


2502 


2526 


2550 


2570 


2590 


2418 


2449 


2621 


2657 


2679 


2705 


2755 


2755 


2774 


2817 


2944 


2956 


2966 


2965 


2987 


2990 


3001 


3017 


5201 


5205 


5225 


5254 


5241 


5245 


3255 


3265 


5554 


5559 


5541 


5567 


5608 


5615 


5615 


3666 


5626 


5655 


5925 


5929 


5959 


5961 


4024 


4029 


4206 


4227 


4259 


4250 


4252 


4282 


4264 


4293 


4540 


4545 


4546 


4401 


4402 


4415 


4426 


4434 


1548 


1564 


1561 


1400 


1450 


1446 


1465 


1462 


1620 


1659 


1665 


1679 


1696 


1/15 


1759 


1755 


1954 


1966 


1996 


2011 


2050 


2075 


2095 


2115 


2294 


2519 


2542 


2562 


2562 


2410 


2445 


2461 


2651 


2675 


2697 


2749 


2829 


2666 


2906 


2926 


5105 


5155 


5146 


5174 


5165 


5227 


i246 


5256 


5600 


5715 


5742 


5615 


5647 


5955 


5975 


4012 


4417 


4420 














1524 


1548 


1564 


1581 


1400 


1450 


1446 


1465 


1605 


1620 


1659 


1663 


1679 


1696 


1715 


1759 


1901 


1954 


1966 


1996 


2011 


2050 


2075 


2095 


2274 


2294 


2519 


2542 


2362 


2562 


2410 


2445 


2614 


2651 


2675 


2697 


2749 


2629 


2866 


2906 


5011 


5066 


5064 


5105 


5153 


5148 


5174 


5185 


5428 


5522 


5526 


5560 


3596 


5600 


3713 


5742 


4055 


4064 


4105 


4166 


4202 


4254 


4417 


4420 



1525 


1549 


1565 


1562 


1401 


1451 


1447 


1464 


1604 


1621 


1640 


1664 


1660 


1697 


1716 


1740 


1902 


1955 


1967 


1997 


2012 


2051 


2076 


2096 


2275 


2295 


2520 


2545 


2363 


2585 


2411 


2444 


2615 


2652 


2674 


2696 


2728 


2750 


2769 


2812 


2966 


2972 


2975 


2995 


3012 


3067 


3065 


3106 


5257 


5259 


5567 


5391 


3429 


3523 


3527 


3561 


5954 


5976 


4015 


4017 


4054 


4065 


4095 


4104 


1174 


1177 


1180 


1183 


1196 


1199 


1200 


1201 


1256 


1257 


1259 


1240 


1265 


1269 


1283 


1285 


1575 


1578 


1592 


1395 


1427 


1441 


1443 


1457 


1555 


1548 


1550 


1577 


1584 


1598 


1600 


1614 


1695 


1706 


1710 


1736 


1750 


1752 


1766 


1769 


1659 


1662 


1699 


1951 


1964 


2000 


2008 


2056 


2157 


2161 


2177 


2161 


2197 


2201 


2255 


2247 


2559 


2555 


2559 


2375 


2579 


2415 


2428 


2431 


2552 


2541 


2555 


2560 


2579 


2585 


2618 


2653 
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155 
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CROSS 


REFERENCE 


TABLE -- 


HACRO 


NAMES 
















2655 


2659 


2645 


2662 


2665 


2700 


2705 


2715 


2^57 


2744 


2769 


2792 


2/96 


2822 


2046 




2650 


2656 


2665 


2909 


2914 


2916 


2916 


2924 


2931 


2956 


2953 


2955 


2962 


5008 


5055 




5042 


5052 


3062 


3074 


3062 


3094 


3101 


3119 


3124 


5142 


5177 


5166 


5192 


5194 


5196 




5207 


3210 


3213 


3216 


3219 


3221 


3231 


3237 


3239 


3276 


3276 


5264 


3269 


5546 


5350 




5355 


555(> 


5357 


5556 


3559 


3360 


3562 


3365 


3375 


3409 


3412 


5415 


3440 


3444 


3445 




5447 


3446 


5471 


3472 


5475 


3474 


3475 


3476 


3460 


3463 


3466 


3496 


3510 


5516 


3544 




5547 


3556 


5564 


3570 


5575 


3561 


3564 


3566 


3617 


3619 


3623 


3627 


3628 


5630 


3631 




5645 


5660 


5666 


3696 


5706 


3709 


3719 


3729 


3746 


3752 


3765 


3790 


3602 


5606 


3609 




S619 


5650 


3660 


3663 


^5 


3669 


3691 


3695 


3696 


5901 


3905 


3911 


5915 


5916 


5942 




3944 


5965 


5966 


3972 


5979 


4000 


4005 


4007 


4020 


4022 


4027 


4037 


4067 


4073 


4077 




4062 


4065 


4175 


4177 


4179 


4191 


4196 


4206 


4224 


4272 


4274 


4266 


4290 


4295 


4316 




4361 


4423 


4452 


4436 


4436 


4440 


4442 


4447 


4449 


4451 


4453 


4461 


4465 


ilpcmt 


!• 


3199 


3664 


3766 


4260 


4320 


4326 


















lOPAOO 


!• 


1172 


1175 


1176 


1161 


1226 


1229 


1236 


2936 


3202 


3237 


3239 


3353 


3446 


3629 




3667 


3771 


3965 


4000 


4027 


4263 


4323 


4331 


4S61 


4451 


4453 


4463 








14 


3265 


4275 


























iQPCOl 


14 


1172 


1175 


1176 


1161 


1226 


1229 


1236 


1265 


1302 


1319 


1561 


1378 


1595 


1445 




1460 


1477 


1516 


1535 


1550 


1600 


1617 


1634 


1676 


1693 


1710 


1752 


1769 


1766 


1626 




1645 


1662 


2072 


2092 


2112 


2161 


2161 


2201 


2251 


2271 


2291 


2359 


2359 


2379 


2431 




2459 


2465 


2532 


2560 


2565 


2633 


2645 


2665 


2769 


2646 


2914 


2936 


3196 


3202 


3237 




5239 


3265 


3353 


3365 


3375 


3415 


3446 


3483 


3466 


3510 


3544 


5547 


3573 


3561 


5564 




3566 


3617 


5619 


3629 


3645 


3667 


3707 


3709 


3729 


3752 


3771 


5607 


3609 


3911 


3915 




3918 


5942 


5944 


3965 


3969 


3979 


4000 


4004 


4006 


4027 


4037 


4073 


4062 


4224 


4275 




4263 


4266 


4290 


4295 


4323 


4SS1 


4361 


4449 


4451 


4453 


4463 






iaPC02 


14 


4266 


4295 


4449 
























tOPCOO 


14 


1172 


1175 


1176 


1161 


1226 


1229 


1236 


1265 


1302 


1319 


1561 


1376 


1395 


1445 




1460 


1477 


1516 


1535 


1550 


1600 


1617 


1634 


1676 


1693 


1710 


1752 


1769 


1766 


1628 




1645 


1662 


2072 


2092 


2112 


2161 


2161 


2201 


2251 


2271 


2291 


2339 


2359 


2379 


2431 




2459 


2465 


2552 


2560 


2563 


2633 


2643 


2665 


2769 


2646 


2914 


2936 


3196 


3202 


3237 




3239 


3265 


3353 


SS65 


3375 


3415 


3446 


3463 


3466 


3510 


3544 


3547 


3573 


3561 


3564 




3566 


3617 


3619 


5629 


3645 


3667 


3707 


3709 


3729 


3752 


3771 


3607 


3609 


3911 


3915 




3916 


3942 


3944 


3965 


3969 


3979 


4000 


4004 


4006 


4027 


4037 


4073 


4062 


4224 


4275 




4263 


4266 


4290 


4295 


4S2S 


4SS1 


4361 


4449 


4451 


4453 


4463 










lOPCOn 


14 


4295 




























lopocr 


14 


1154 


1157 


1161 


1164 


1166 


1169 


1171 


1172 


1174 


1175 


1177 


1178 


1180 


1161 




1163 


1196 


1199 


1200 


1201 


1202 


1203 


1205 


1209 


1212 


1217 


1218 


1226 


1228 


1229 






1232 


1236 


1257 


1236 


1239 


1240 


1260 


1261 


1263 


1269 


1272 


1273 


1283 


1285 




)2M 


1289 


1299 


1302 


1305 


1306 


1316 


1319 


1324 


1325 


1345 


1348 


1349 


1359 


1561 




1364 


1565 


1375 


1376 


1361 


1362 


1392 


1395 


1400 


1401 


1427 


1430 


1451 


1441 


1445 




1446 


1447 


1457 


1460 


1463 


1464 


1474 


1477 


1462 


1463 


1507 


1508 


1510 


1516 


1518 




1521 


1522 


1552 


1535 


1537 


1536 


1546 


1550 


1553 


1554 


1574 


1575 


1577 


1564 


1567 




1566 


1596 


1600 


1603 


1604 


1614 


1617 


1620 


1621 


1631 


1634 


1639 


1640 


1660 


1665 




1664 


1674 


1676 


1679 


1660 


1690 


1693 


1696 


1697 


1706 


1710 


1715 


1716 


1736 


1739 




1740 


1730 


1752 


1755 


1756 


1766 


1769 


1772 


1773 


1763 


1766 


1791 


1792 


1612 


1615 




1616 


1626 


1626 


1631 


1632 


1642 


1845 


1S48 


1649 


1659 


1662 


1667 


1666 


1699 


1901 




1902 


1931 


1934 


1935 


1964 


I'm 


1967 


1996 


1997 


2000 


2006 


2011 


2012 


2050 


2051 




2056 


2066 


2072 


2075 


2076 


2066 


2092 


2095 


2096 


2106 


2112 


2115 


2116 


2141 


2142 




2145 


2157 


2161 


2164 


2165 


2177 


2161 


2164 


2165 


2197 


2201 


2204 


2205 


2250 


2231 




2235 


2247 


2251 


2254 


2255 


2267 


2271 


2274 


2275 


2267 


2291 


2294 


2295 


2319 


2320 




2325 


2335 


2339 


2342 


2343 


2355 


2359 


2362 


2363 


2375 


2379 


2362 


2365 


2410 


2411 




2415 


2428 


2431 


2434 


2435 


2436 


2437 


2440 


2443 


2444 


2455 


2459 


2461 


2462 


2470 




2471 


2461 


2465 


2487 


2466 


2510 


2511 


2515 


2526 


2532 


2535 


2536 


2557 


2558 


2541 




2544 


2545 


2555 


2560 


2565 


2564 


2565 


2566 


2566 


2569 


2579 


2565 


2566 


2587 


2568 




2569 


2591 


2592 


2614 


2615 


2616 


2633 


2635 


2639 


2643 


2646 


2647 


2648 


2649 


2651 




2652 


2662 


2665 


2666 


2669 


2670 


2671 


2673 


2674 


2697 


2696 


?700 


2705 


2715 


2718 




2719 


2720 


2721 


2722 


2723 


2724 


2726 


2737 


2744 


2749 


2750 


?761 


2762 


2765 


2764 
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2765 2766 2767 2769 

2822 2t29 2S50 2646 

2886 288^ 2906 2907 

2941 2942 2943 2946 

2994 2995 3006 SOU 

3058 3062 3066 3067 

3128 3129 3130 3133 

3194 5196 3199 3200 

3227 3228 3231 3233 

3276 3278 3281 3284 

3360 3362 3365 3375 

3415 3423 3424 3425 

3473 3474 3475 3478 

3510 3513 3514 3515 

3561 3564 3570 3573 

3607 3617 3619 3623 

3665 3667 3669 3670 

3692 3693 3694 3695 

3746 3752 3761 3762 

3784 3785 3786 3790 

3813 3814 3819 3825 

3895 3898 3901 3905 

3965 3966 3969 3972 

4017 4020 4022 4027 

4088 4089 4090 4091 

4193 4196 4202 4203 

4234 4235 4237 4241 

4285 4286 4288 4290 

4329 4331 4333 4334 

4428 4432 4436 4438 





4465 


4474 






lOPEQU 


1« 








tOPNAN 


1« 








»OP*CG 


1* 








tOPNOR 


1* 








tOPNOT 


1* 


1302 


1378 


1460 




2291 


2339 


2379 


2431 




3581 


3617 


3619 


3707 




4037 








lOPOR 


!• 


1285 


1319 


1361 




1862 


2092 


2181 


2271 




3584 


3566 


3645 


3911 


lOPROT 


1* 


4449 






tOPRO 


1* 


1154 


1161 


1164 




1212 


1236 


1239 


1240 




1457 


1474 


1510 


1516 




1736 


1750 


1766 


1783 




2088 


2108 


2145 


2157 




2428 


2440 


2455 


2481 




2713 


2737 


2744 


2792 




2955 


2982 


3008 


3035 




3186 


3192 


3194 


3199 




3350 


3356 


SSS7 


3358 




3473 


3474 


3475 


3476 




3664 


3686 


3698 


3719 




3891 


3895 


3898 


3901 
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2789 


2792 


2796 


2802 


2803 


2850 


2856 


2861 


2862 


2863 


2909 


2914 


2916 


2918 


2924 


2947 


2953 


2955 


2967 


2968 


3012 


3035 


3042 


3045 


3046 


3074 


3082 


3064 


3085 


3094 


3134 


3142 


3148 


3149 


3174 


3202 


3204 


3205 


3207 


3210 


3237 


3239 


3244 


3248 


3249 


3285 


3286 


3287 


3289 


3346 


3379 


3380 


3381 


3382 


3386 


3426 


3428 


3429 


3440 


3444 


3480 


3483 


3486 


3496 


3501 


3516 


3518 


3522 


3523 


3526 


3581 


3584 


3586 


3589 


3590 


3627 


3628 


3629 


3630 


3631 


3676 


3677 


3678 


3679 


3680 


3698 


3706 


3707 


3709 


3713 


3763 


3765 


3768 


3769 


3771 


3792 


3793 


3794 


3795 


3796 


3847 


3848 


3850 


3856 


3857 


3911 


3915 


3918 


3925 


3926 


3975 


3976 


3979 


4000 


4003 


4033 


4034 


4037 


4064 


4065 


4092 


4093 


4095 


4103 


4104 


4206 


4211 


4212 


4213 


4214 


4242 


4251 


4253 


4272 


4274 


4292 


4295 


4297 


4302 


4318 


4336 


4339 


4347 


4361 


4403 


4440 


4442 


4444 


4447 


4449 


1518 


1550 


1617 


1693 


1769 


2485 


2532 


2583 


2633 


2665 


3709 


3729 


3752 


3607 


3609 


1395 


1443 


1477 


1535 


1600 


2359 


2459 


2560 


2643 


2789 


3915 


3918 


4073 


4062 


4290 


1166 


1169 


1183 


1196 


1199 


1263 


1269 


1283 


1299 


1316 


1532 


1548 


1577 


1564 


1598 


1812 


1826 


1842 


1859 


1899 


2177 


2197 


2235 


2247 


2267 


2515 


2528 


2541 


2S55 


2579 


2796 


2822 


2850 


2856 


2883 


3042 


3052 


3062 


3074 


3082 


3207 


3210 


3213 


3216 


3219 


3359 


3360 


3362 


3409 


3412 


3480 


3496 


3516 


3SS8 


3564 


3746 


3765 


3768 


3790 


3802 


3905 


3972 


4020 


4022 


4067 











SEQ 156 




9A05 




9 AO 7 


2808 


2812 




91165 




9867 


2870 


2883 




C 7C 7 


9951 

C 7<^ A 


9955 


2936 


2940 




9979 

C 7 f C 


9974 


997S 


2982 


2969 


3047 




5059 




3056 


3057 


3101 


5105 


51Q6 


5119 


3124 


3127 


3175 


3177 


S1A3 


5184 


3186 


3192 


5213 


3916 


3919 

^CX ' 


3991 


3224 


3225 




59tt 


59^7 


59S8 


3259 


3262 




3353 

j^ 


5556 


55S7 

J J J r 


3358 


3359 




5590 


3591 


5596 


3409 


3412 


^44^ 


544A 


5447 


5448 


5471 


3472 


<9 JVC 


5505 


5S04 




3506 


3507 




5555 


5544 


5547 


3558 


3560 


3591 

<9^7X 


5599 


5596 


5597 


3600 


3601 






5656 


5657 


3660 


3664 


3M1 


5689 


5686 


5689 


3690 


3691 


3714 


5719 


5794 


5799 


3742 


3743 


5775 


5774 


5 7 AO 


5781 
J ■ ox 


3782 


3783 


5797 


5798 


5809 


5806 


3807 


3809 


MSA 




5885 


5885 


3889 


3891 


<^7C ■ 




5955 

<J 7 W 


5954 


3942 


3944 




4M7 




401P 


4013 


4016 


4M7 

■ 


407S 


4077 


4MP 


4065 


4067 




4177 


4179 


41M 


4189 


4191 


^CA7 




4PP1 




4224 


4226 


4P7S 


4P7& 


4P77 


4PM 


4281 


4283 


^ Jew 


4^1 






4326 


4328 


4417 


441A 


44PO 


44P1 


4423 


4425 


4451 


4453 


4457 


4458 


4461 


4463 


IMS 


9079 


91 1 9 
cxxc 


9161 
CXDX 


9901 


22^1 


55&^ 


541S 


5486 


5S44 


3547 


3573 


3942 


3944 


3969 


3979 


4004 


4008 


1<t54 


xO rO 


1710 
X ' xV 


1759 


1786 


1828 


2648 


2914 


3196 


3375 


3483 


3510 


1900 


1901 
xcvx 


1909 


1905 


1205 


1209 




1 5S9 

X J J ' 


1 57S 


1599 


1427 


1441 


1 A1 A 


XOJX 


1660 


1674 

Xv f ^ 


1690 


1706 


1Q51 


X 




9008 


2056 


2068 




9595 


9555 


9555 

C J J J 


237b 


2415 




96 5S 


9659 


9669 


2700 


2705 




991lt 
C 'Xv 


9918 

C 'XO 


9994 


2931 


2953 




5101 
^XvX 


51 19 

WXX7 


5194 


3142 


3177 




5951 


5976 


5978 


3289 


3346 


5AAO 


XAAA 


5447 


5448 


3471 


3472 


5S70 


5&95 


5697 


56 50 


3631 


3660 




5IISO 


5880 


5883 


3885 


3889 


4077 


4085 


4175 


4177 


4179 


4191 
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CVOVAO.PII 12 ML 64 05:04 CROSS REFERENCE TABLE MACRO NAMES 



$0P«1 



lOPSUB 
lOPSUB 
lOPXOR 

•OR 
•PUT 

• STRUC 
•SUBON 



• T»€K 



• TILA 

• TILO 
•UNTL2 
•UNTlS 
•yHlLE 

• •CMIE 
••CHTH 
••DEFA 

• •ElOS 
••ERRO 
••ESCA 

• •GEN 



4196 
1* 
14 
1460 
1845 
?459 
52S4 
S617 
S965 
4449 
1* 
1* 
14 
14 
14 



14 
14 
14 
14 
14 
9704 
9704 
14 
14 
14 
14 
14 
14M 
1761 
2125 
2467 
2S55 
5077 



4206 
5202 
1171 
1477 
1S62 
2465 
5555 
5619 
5966 
4451 
4266 
4224 



4272 


4280 


4516 


4520 


4S26 


4425 


4452 


4456 


4456 


4440 


4442 


4447 


4461 


5667 


5771 


4265 


4295 


4525 


4551 












1174 


1177 


1160 


1226 


122S 


1257 


1265 


1502 


1519 


1561 


1576 


1595 


1443 


1516 


1555 


1550 


160C 


1617 


1654 


1676 


1695 


1710 


1752 


1769 


1766 


1626 


2072 


2092 


2112 


2161 


2161 


2201 


225 1 


2271 


2291 


2559 


2559 


2579 


2451 


2552 


2560 


2565 


2655 


2643 


2665 


2769 


2646 


2914 


2936 


5196 


5257 


5259 


5565 


5575 


5415 


5445 


5465 


5466 


5510 


5544 


5547 


5575 


5561 


5564 


5566 


5626 


5645 


5706 


5709 


5729 


5752 


5606 


5609 


5911 


5915 


5916 


5942 


5944 


5979 


4000 


4005 


4007 


4027 


4057 


4075 


4062 


4224 


4274 


4266 


4290 


4561 


4455 


4465 



















14 


2435 


a36 


2564 


2567 


2647 


2669 


^7 1 A 


2762 




2062 


9046 


3056 


5126 


5580 


5424 


3502 


3514 


3590 


VA 7^ 

5677 


9690 


9761 


V 7AV 

5799 


40B6 


4220 










14 
14 


1225 


1231 


1266 


1276 


1294 


1911 


1990 


1954 


1970 


« SA7 

196' 


1406 


1456 


1452 


1469 


1 AAA 

1466 


1519 




1549 


1559 


1580 


1599 


1699 


1626 


1645 


4 ^^A 

1669 


1605 


1702 


1721 


1745 


1 'Dl 






loci 


1 AV7 




1 ^7^ 


irfXc 






2UU3 


2026 


2TO9 


2003 


2103 


2125 


2146 


2172 


2192 


2212 


2236 


2262 


2282 


2302 


2326 


2350 


2570 


2390 


2416 


2449 


2467 


2476 


2495 


2516 


2550 


2574 


2597 


2621 


2657 


2679 


2703 


2755 


2755 


2774 


2817 


2655 


2675 


2892 


2912 


2934 


2938 


2940 


2958 


2985 


2987 


2989 


2990 


5001 


5017 


5077 


5097 


5115 


5145 


3155 


3180 


3189 


3203 


3206 


3234 


3241 


3244 


5245 


5255 


3265 


5271 


5275 


5281 


3282 


3397 


3405 


3405 


3434 


3534 


3559 


3541 


3567 


5608 


5615 


5615 


5666 


5671 


5722 


5724 


5725 


5749 


3772 


3775 


3822 


3825 


3826 


3853 


3925 


5959 


3981 


4024 


4029 


4040 


4070 


4100 


4109 


4194 


4198 


4208 


4226 


4227 


4239 


4250 


4284 


4287 


4292 


4295 


4500 


4324 


4327 


4332 


4335 


4336 


4337 


4339 


4340 


4345 


4401 


4426 


4434 


4445 


445« 


4457 


4472 


























14 


1217 


1260 


1272 


1288 


1305 


1324 


1348 


1564 


1561 


1400 


1450 


1446 


1465 


1462 


1507 


1521 


1537 


1555 


1574 


1587 


1603 


1620 


1659 


1665 


1679 


1696 


1715 


1759 


1755 


1772 


1791 


1815 


1831 


1848 


1867 


1901 


1934 


1966 


1996 


2011 


2050 


2075 


2095 


2115 


2141 


2164 


2184 


2204 


2230 


2254 


2274 


2294 


2319 


2342 


2362 


2382 


2410 


2445 


2461 


2470 


2487 


2510 


2544 


2568 


2591 


2614 


2651 


2673 


2697 


2749 


2829 


2886 


2906 


2928 


2946 


2971 


2974 


2994 


3011 


3066 


3084 


3105 


3133 


3148 


5174 


5185 


5227 


5248 


5256 


5586 


3590 


3428 


3522 


3526 


3560 


3596 


3600 


3713 


3742 


5615 


5847 


5955 


5975 


4012 


4016 


4033 


4064 


4103 


4186 


4202 


4234 


4417 


4420 















2940 
2966 



611* 

1207 
1515 
1776 
2148 
2476 
2875 
5097 



5925 
5223 



1223 
1527 
1797 
2172 
2493 
2892 
5115 



1266 
1545 

1621 
2192 
2516 
2912 
5145 



1278 
1559 
1857 
2212 
2550 
2926 
5155 



1294 
1580 
1854 
2238 
2574 
2954 
5180 



1511 
1595 
1675 
2262 
2597 
2958 
5189 



1350 
1609 
1912 
2282 
2621 
2944 
5201 



1354 
1626 
1945 

2302 
2657 
2958 
5205 



1570 
1645 
1979 
2526 
2679 
2966 
3225 



1567 
1669 
2005 
2550 
2705 
2965 
5254 



1406 
1665 

2026 
2570 
2755 
?967 
5241 



1456 

1702 
2059 
2590 
2755 
2990 
5245 



1452 
1721 
2085 
2416 
2774 
5001 
5255 



1469 
1745 
2103 
2449 

2817 
5017 
5265 



r 1 7 



MGCTS 



»$GCTT 
tINEUT 



IIPOP 



IIPUSH 



MSELE 
MSCT 



ZZ CVOVA 


0 


MACTll 


50A( 1052 ) 


12 JU. 64 09 


52 PAGE 


162 
















11 1^ 


-JUL 64 


05:04 




CROSS 




T48LE 


MACRO 


NA»«S 














5^71 


5275 


5262 


5397 


5405 


5405 


3434 


3554 


5559 


5541 


5567 


5608 


561S 


5615 


S666 


5666 


5722 


5725 


5749 


5770 


5772 


5622 


3626 


3655 


5925 


5929 


5959 


5961 


4024 


4029 


4040 


4070 


4100 


4109 


4150 


4165 


4194 


4196 


4206 


4227 


4259 


4250 


4252 


4257 


4262 


42M 


4295 


4500 


4501 


4306 


4322 


4324 


4530 


4532 


4337 


4340 


4345 


4346 


4567 


4401 


4402 


4405 


4415 


4426 


4434 


4445 


4455 


4472 


4475 










1* 


1225 


1251 


1266 


1278 


1294 


1311 


1330 


1354 


1570 


1567 


1406 


1456 


1452 


1469 


1466 


1513 


1527 


1545 


1559 


1580 


1595 


1609 


1626 


1645 


1669 


1685 


1702 


1721 


1745 


1761 


1778 


1797 


1621 


1857 


1654 


1675 


1912 


1945 


1979 


2003 


2026 


2059 


2083 


2105 


2125 


2148 


2172 


2192 


2212 


2238 


2262 


2262 


2302 


2326 


2350 


2370 


2390 


2418 


2449 


2467 


2476 


2493 


2918 


2550 


2574 


2597 


2621 


2657 


2679 


2703 


2733 


2755 


2774 


2617 


2SS5 


2875 


2892 


2912 


2933 


2934 


2956 


2940 


2958 


2985 


2987 


2989 


2990 


3001 


5017 


3077 


3097 


3115 


3145 


3155 


3180 


3189 


3203 


3206 


3233 


3234 


3241 


3244 


3245 


3252 


5255 


3262 


3263 


3271 


3273 


3261 


3282 


3396 


3397 


3403 


3405 


3434 


3533 


5534 


3539 


5541 


3567 


5607 


3606 


3613 


3615 


9666 


3671 


5722 


3724 


3725 


3749 


3772 


5775 


3822 


5625 


3826 


3653 


3925 


3939 


3981 


4024 


4029 


4040 


4070 


4100 


4109 


4193 


4194 


4196 


4206 


4211 


4226 


4227 


4239 


4250 


4264 


4267 


4292 


4293 


4300 


4324 


4327 


4532 


4335 


4556 


4337 


4339 


4340 


4545 


4401 


4425 


4426 


4434 


4444 


4445 


4455 


4457 


4472 


1* 


2933 


3233 


5252 


3262 


3396 


3533 


3607 


4193 


4211 


4425 


4444 






!• 


3202 


3667 


5771 


4263 


4323 


4331 


















1* 


611* 


1166 


1250 


1336 


1413 


1495 


1566 


1652 


1726 


1804 


1887 


1920 


1953 


1967 


2040 


2131 


2220 


2310 


2398 


2500 


2606 


2686 


2778 


2839 


2895 


3027 


3164 


3333 


3459 


5656 


3755 


3636 


4055 


4121 




















14 


1223 


1231 


1266 


1278 


1294 


1311 


1530 


1354 


1370 


1367 


1406 


1436 


1452 


1469 


1468 


1515 


1527 


1545 


1559 


1580 


1593 


1609 


1626 


1645 


1669 


1665 


1702 


1721 


1745 


1761 


1776 


1797 


1821 


1637 


1854 


187J 


1912 


1945 


1979 


2003 


2026 


2059 


2083 


2103 


2125 


2148 


2172 


2192 


2212 


2238 


2262 


2282 


2302 


2326 


2350 


2370 


2390 


2418 


2449 


2467 


2476 


2493 


2518 


2550 


2574 


2597 


2621 


2657 


2679 


2703 


2733 


2755 


2774 


2817 


2835 


2875 


2892 


2912 


2934 


29S8 


2940 


2958 


2985 


2987 


2989 


2990 


3001 


3017 


3077 


5097 


3115 


3145 


SISS 


3180 


3189 


S20S 


3206 


5254 


3241 


5244 


3245 


3253 


3263 


3271 


S27S 


3281 


3282 


3397 


3403 


3405 


3434 


3534 


3539 


3541 


3567 


3606 


3613 


3615 


3666 


5671 


3722 


3724 


3725 


3749 


3772 


3775 


3822 


3825 


3826 


3853 


3925 


3939 


3961 


4024 


4029 


4040 


4070 


4100 


4109 


4194 


4198 


4208 


4226 


4227 


4239 


4250 


4264 


4287 


4292 


4293 


4300 


4324 


4327 


4332 


4335 


4336 


4337 


4339 


4340 


4345 


4401 


4426 


4434 


4445 


4455 


4457 


4472 


























1* 


1207 


1208 


1217 


1219 


1260 


1262 


1272 


1274 


1288 


1290 


1305 


1307 


1324 


1526 


1S46 


1350 


1364 


1366 


1381 


1383 


1400 


1402 


1430 


1432 


1446 


1446 


1463 


1465 


1462 


1464 


1507 


1509 


1521 


1523 


1537 


1539 


1553 


1555 


1574 


1576 


1567 


1569 


1605 


1605 


1620 


1622 


1639 


1641 


1663 


1665 


1679 


1661 


1696 


1698 


1715 


1717 


1759 


1741 


1755 


1757 


1772 


1774 


1791 


1793 


1615 


1817 


1831 


1833 


1648 


1650 


1867 


1669 


1901 


1903 


1934 


1936 


1966 


1968 


1996 


1998 


2011 


2013 


2050 


2052 


2075 


2077 


2095 


2097 


2li5 


2117 


2141 


2143 


2164 


2166 


2184 


2186 


2204 


2206 


2230 


2232 


2254 


2256 


2274 


2276 


22«»4 


2296 


2319 


2S21 


2542 


2S44 


2362 


2364 


2582 


2S84 


2410 


2412 


2443 


2445 


2461 


2463 


2470 


2472 


2487 


2489 


2510 


2512 


2544 


2546 


2566 


2570 


2591 


2593 


2614 


2616 


2651 


2653 


2673 


2675 


2697 


2699 


2728 


2729 


2749 


2751 


2769 


2770 


2612 


2813 


2829 


2651 


2870 


2871 


2886 


2888 


2906 


2908 


2926 


2927 


2926 


2930 


2935 


2946 


2946 


2966 


2967 


2969 


2971 


2973 


2974 


2976 


2989 


2994 


2996 


3011 


3013 


3066 


3066 


3084 


5066 


5105 


5107 


3133 


3135 


3146 


3150 


3174 


3176 


3163 


3105 


3199 


3201 


3202 


5206 


5225 


5224 


3226 


3227 


3229 


3235 


3244 


3246 


3250 


3254 


3256 


3260 


3264 


5366 


5566 


5590 


5592 


3398 


3426 


3430 


3522 


3524 


3526 


3526 


3535 


3560 


3562 


3596 


3596 


3600 


5602 


5609 


5664 


3666 


3667 


5671 


3713 


3715 


3742 


3744 


3766 


3770 


3771 


3775 


3615 


5615 


3647 


3649 


3923 


3924 


5933 


3935 


3975 


3977 


4012 


4014 


4016 


4016 


4053 


4035 


4064 


4066 


4095 


4096 


4105 


4105 


4151 


4185 


4186 


4188 


4190 


4195 


4202 


4204 


4226 


4234 


4236 


4256 


4260 


4282 


4283 


4287 


4307 


4320 


4322 


4325 


4327 


4326 


4330 


4331 


4335 


4566 


4406 


4415 


4416 


4417 


4419 


4420 


4422 


4427 


4446 












51214 


5130 


5151 


5132 


5133 


5135 


5137 


5136 


5139 
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CROSS REFERENCE TABLE 



MACRO NAME; 



IIStTW 
>>SETS 



IISETT 
MSKIP 



.EQUAT 
.»€AOE 

.KTll 
.SETUP 

• surhi 

.StM.0 

.lACTl 

.tAPTB 

.♦APTM 

.♦APTr 

.tASTA 

.•CATC 

.I01TA 

.10620 

.10620 

.lOIV 

.lEOP 

.lERRO 

.lEMT 

.♦MULT 

.IPOME 

.•RAM) 

.IROOE 

.•ROOC 

.•READ 

. •R2AZ 

.tSAVE 

.ISB20 

.15620 

.ISCOP 

.*SIZE 



1127# 
1# 
IMS 
14S4 
1620 
1757 
1954 
2117 
2294 
246S 
2651 
2031 
2967 
3105 
5224 
3S92 
3609 
3047 
4066 
4236 
4360 
!• 
1* 
2910 
3020 
1« 
!• 
1* 
!• 
!• 
700# 
!• 
1* 
1* 
1* 
1* 
1* 
I* 
I* 
I* 
I* 
I* 
!• 
I* 
!• 
1« 
1* 
1* 
1* 
I* 
!• 
1# 
I* 
I* 
!• 
14 



lev f 


190A 


1217 


1219 


1260 


1262 


1272 


1274 


1200 


1290 


1305 


1^7 


1S94 


1 


1 ISO 


1364 


1366 


1301 


1303 


1400 


1402 


1430 


1432 


1446 


1440 


1463 


1465 


14A9 




1509 


1521 


1523 


1537 


1539 


1553 


1555 


1574 


1576 


1507 


1509 


1603 


160S 




16S9 


1641 


1663 


1665 


1679 


1601 


1696 


1690 


1715 


1717 


1739 


1741 


1755 




1774 


1791 


1793 


1015 


1017 


1031 


1033 


1040 


105C 


1067 


1069 


1901 


190S 




1966 


1960 


1996 


1990 


2011 


2013 


2050 


2052 


2075 


2077 


2095 


2097 


2115 

C A A J 


9141 


P14S 


2164 


2166 


2104 


2106 


2204 


2206 


2230 


22S2 


2254 


2256 


2274 


9976 




9319 


2S21 


2542 


2344 


2362 


2364 


2302 


2304 


2410 


2412 


2443 


2445 


2461 


9470 


9472 


2407 


2409 


2510 


2512 


2544 


2546 


2560 


2570 


2591 


2593 


2614 


2616 




9673 


2675 


2697 


2699 


2720 


2729 


2749 


2751 


2769 


2770 


2012 


2013 


2029 




9A71 


2006 


2000 


2906 


2900 


2926 


2927 


2920 


2930 


29^5 


2946 


2940 


2966 




9971 


2973 


2974 


2976 


2909 


2994 




3011 


3013 


3066 


3060 


5004 


3006 


1107 


3133 


3135 


3140 


3150 


3174 


3176 


3103 


3105 


3190 


3201 


3202 


3206 


3223 


S996 


3927 


5929 


S235 


3244 


3240 


3250 


3254 


3256 


3260 


32€»4 


3306 


3300 


3790 


SS9B 


3420 


34 SO 


3522 


3524 


3526 


3520 


3535 


3560 


3562 


3596 


3590 


3600 


3602 




3666 


3667 


3671 


3713 


3715 


3742 


3744 


3760 


3770 


3771 


3775 


3013 


3015 


3049 


3923 


3924 


3933 


3935 


3975 


3977 


<»012 


4014 


4016 


4010 


4033 


4035 


4064 


4095 


4096 


4103 


4105 


4151 


4105 


4106 


4100 


4190 


4195 


4202 


4204 


4226 


4234 


4250 


4200 


4202 


4203 


4207 


4307 


4320 


4322 


4323 


4327 


4320 


4530 


4331 


4335 


4406 


4415 


4416 


4417 


4419 


4420 


«r422 


4427 


4446 












0114 


1264 


1511 


1570 


2001 


2057 


2146 


2236 


2524 


2416 


2516 


2600 


2619 


2701 


2956 


2903 


5020 


5075 


3095 


3113 


3143 


3150 


3170 


3107 


3292 


3565 


3720 


3747 


S05I 


3947 


4060 


4113 























701 
679 

1000 
609 

937 
10144 
940 

4779 

926 
970 



4477 
4036 



4516 



4640 



4090 



. tSUPfi 


1* 




. tTRAP 


1* 


5096 


. ITYPe 


1* 




.ITYPO 


!• 


4954 


. «TYP€ 


1* 


4561 


. »TYPO 


1# 


5021 


.UOCA 


1« 




.1170 


!• 





. ASS. 015406 000 



ERRORS DETECTED: 0 

CVDVAO . CVDVAO/SOL /CRT -CVDVM) . StL . CVDVAO . HAC . C VDVAO . P 1 1 
RUN-TPC: 84 90 6 SECONDS 
RU<-TIfC RATIO: 287/161-1.5 
CORE USED: 43K (85 PAGES) 



